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1.0 GENERAL PROGRAM CONSIDERATIONS 

1.1 PROGRAM ABSTRACT 

CZOMUBO IS PART ONE OP THE DMU FUNCTIONAL VERIFICATION TE'-.T . 
THIS PART OF THE TEST VERIFIES THE RESET. SELF TEST, REGIST=^R 
ACCESS. BMP CODE, AND INTERRUPT FUNCTIONS OF THE BOARD ARE 
FUNCTIONING CORRECTLY, 

^MIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH THE DIAGNOSTIC 
PUNTIME SERVICES SOFTWARE (SUPERVISOR). THESE SERVICES PROVIDE 
Tt« INTERFACE TO THE OPERATOR AND TO THE SOFTWARE ENVIRONMENT. 
THIS PROGRAM CAN BE USED WITH XXDP». ACT. APT. SLIDE AND PAPER 
TA<>E. FOR A COMPLETE DESCRIPTION OF THE RUNTIhE SERVICES. REFER 
TO THE XXDP» USER'S MANUAL. THERE IS A BRIEF DESCRIPTION OF 
THE RUNTIME SERVICES IN THE OPERATING INSTRUCTIONS COMMANDS 
OF THIS DOCUMENT. 



1.2 SrSTEM REQUIREMENTS 

THE FOLLOWING HARDWARE IS REQUIRED TO RUN THE DHUll FvT: 

0 UNIBUS PROCESSOR WITH AT LEAST 32K BYTES OF MEMORY 

0 DHU dOARDS INSTALLED ON THE UNIBUS. 

0 APPROPRIATE PROGRAM LOAD DEVICE SUPPORTING XXDP* 
MEDIA OR A DOWN LINE LOADING SYSTEM. 



1.5 RELATED DOCUMENTS AND STANDARDS 

0 XXDP» USER'S MANUAL - DESCRIBES THE RUNNING OF DIAGNOSTICS 
UNDER THE XXDP* MONITOR. 

1.4 DIAGNOSTIC HIERARCY PREREQUISITES 

THE PROCESSOR. THE UNIBUS. THE SYSTEM MEMORY. THE CONSOLE TERMINAL 
ANO THE LOAD MEDIA ARE ASSUMED TO HAVE BEEN TESTED AND FOUND WORKING 
BEFORE THIS PROGRAM IS RUN, 
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?.0 OPERATING INSTRUCTIONS 

THIS SECTION CONTAINS A BRIEF DESCRIPTION OF THE RUNTIME SERVICES. 
FOR DETAILED INFORMATION, REFER TO THE XXDP* USER'S MANUAL (CHQUS). 



2.1 COMMANDS 

THERE ARE ELEVEN LEGAL COMMANDS FOR THE DIAGNOSTIC RUNTIME SERVICES 
(SUPERVISOR). THIS SECTION LISTS THE COMMANDS AND GIVES A VERT 
BRIEF DESCRIPTION OF TMFM. THE XXDP* USER'S MANUAL MAS MORE DETAILS. 



COMMAND 



EFFECT 



START 



START THE DIAGNOSTIC FROM AN INITIAL STATE 
START THE DIAGNOSTIC WITHOUT INITIALIZING 
CONTINUE AT TEST THAT WAS INTERRUPTED (AFTER *C) 
CONTINUE FROM AN ERROR HALT 

RETURN TO XXDP* MONITOR (XXDP* OPERATION ONLr!) 
ACTIVATE A UNIT FOR TESTING (ALL UNITS ARE 
CONSIDERED TO BE ACTIVE AT START TIME 
DEACTIVATE A UNIT 

PRINT STATISTICAL INFORMATION (IF IMPLEMENTED 

Br THE DIAGNOSTIC - SEE PERFOMANCE AND PROGRESS 

REPORTS SECTION OF THIS DOCUMENT) 

TrPE A LIST OF ALL DEVICE INFORMATION 

TYPE THE STATE OF ALL FLAGS (SEE FLAGS SECTION) 

CLEAR ALL FLAGS (SEE FLAGS SECTION) 



RESTART 
CONTINUE 
PROCEED 
EXIT 



ADD 



DROP 
PRINT 



DISPLAY 

FLAGS 

ZFLAGS 



A COMMAND CAN BE RECOGNIZED BT THE FIRST THREE CHARACTERS. SO 
YOU MAY. FOR EXAMPLE. TYPE "STA" INSTEAD OF 'START 
MORE INFORMATION CAN BE FOUND WITHIN THE SECTION LABELLED 
EXTENDED COMMAND SYNTAX 
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2.2 SWITCHES 



THERE ARE SEVERAL SWITCHES WHICH ARE USED TO MODIFY SUPERVISOR OPERATION. 
THESE SWITCHES ARE APPENDED TO THE LEGAL COMMANDS. ALL OF THE LEGAL 
SWITCHES ARE TABULATED BELOW WITH A BRIEF DESCRIPTION OF EACH. 
IN THE DESCRIPTIONS BELOW. A DECIMAL NUMBER IS DESIGNATED Br "DODDD . 

SWITCH EFFECT 

/TESTS:LIST EXECUTE ONLT THOSE TESTS SPECIFIED IN 

THE LIST. LIST IS A STRING OF TEST 
NUMBERS. FOR EXAMPLE /TESTS:1:5:7 10. 
THIS LIST WILL CAUSE TESTS 1.5.7.6.9.10 TO 
BE RUN. ALL OTHER TESTS WILL NOT BE RUN. 

/PASS:DDDDD EXECUTE DDDDD PASSES (DDDOD • 1 TO 64000 5 

/FLAGS:FLGS SET SPECIFIED FLAGS. SEE THE FLAGS SECTION 
OF THIS DOCUMENT. 

/EOP:DODDD REPORT END OP PASS MESSAGE AFTER EVERT 

DOODO PASSES ONLY. (DDDDD • 1 TO 64000) 

/UNITS:LIST TEST/AOD/DROP ONLY THOSE UNITS SPECIFIED 

IN THE LIST, LIST EXAMPLE /UNITS:0:5: 10 \2 
USE UNITS 0.5.10.11.12 (UNIT NUMBERS « 0-65) 

EXAMPLE OF SWITCH USAGE: 

START/TESTS: 1-5/PASS: 1000/EOP: 100 

THE EFFECT OF THIS COMMAND WILL BE: I) TESTS 1 THROUGH 5 WILL BE 
EXECUTED, 2) ALL UNITS WILL TESTED 1000 TIMES AND 5) THE END OF 
PASS MESSAGES WILL BE PRINTED AFTER EACH 100 PASSES ONLY. A 
SWITCH CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS. YOU MAY. 
FOR EXAMPLE. TYPE "/TES:l-5" INSTEAD OF VTESlS:! 5". 

BELOW IS A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED By EACH 
COMMAND. 

TESTS PASS FLAGS EOP UNITS 

START XX XX X 

RESTART XX XX X 

CONTINUE X XX 

PROCEED X 

DROP X 

ADD X 

PRINT 

DISPLAY X 

FLAGS 

ZFLAGS 

EXIT 
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FLAGS ARE USED TO SET UP CERTAIN OPERATIONAL PARAMETERS SUCH AS 
LOOPING ON ERROR. ALL FLAGS ARE CLEARED AT STARTUP AND REMAIN 
CLEARED UNTIL EXPLICITLY SET USING THE FLAGS SWITCH, FLAGS 
ARE ALSO CLEARED AFTER A START COMMAND UNLESS SET USING THE 
FLAG SWITCH. THE ZFLAGS COMMAND MAY ALSO BE USED TO CLEAR 
ALL FLAGS, WITH THE EXCEPTION OF THE START AND ZFLAGS COMMANDS. 
NO COmANDS AFFECT THE STATE OF THE FLAGS; THEY REMAIN SET OR 
CLEARED AS SPECIFIED BY THE LAST FLAG SWITCH. 



FLAG EFFECT 

HOE HALT ON ERROR CONTROL IS RETURNED TO 

RUNTIME SERVICES COMMAND MODE 

LOE LOOP ON ERROR 

lER* INHIBIT ALL ERROR REPORTS 

IBR* INHIBIT ALL ERROR REPORTS EXCEPT 

FIRST LEVEL (FIRST LEVEL CONTAINS 
ERROR TYPE. NUMBER. PC. TEST AND UNIT) 

IXR* INHIBIT EXTENDED ERROR REPORTS (THOSE 

CALLED BY PRINTX MACRO'S) 

PRI DIRECT MESSAGES TO LINE PRINTER 

PNT PRINT TEST NUMBER AS TEST EXECUTES 

BOE "BELL " ON ERROR 

UAM UNATTENDED MODE (NO MANUAL INTERVENTION) 

ISR INHIBIT STATISTICAL REPORTS (DOES NOT 

APPLY TO DIAGNOSTICS WHICH 00 NOT SUPPORT 

STATISTICAL REPORTING) 
IDR INHIBIT PROGRAM DROPPING OF UNITS 

ADR EXECUTE AUTOOROP CODE 

LOT LOOP ON TEST 

EVL EXECUTE EVALUATION (ON DIAGNOSTICS WHICH 

HAVE EVALUATION SUPPORT) 



•SEE THE ERROR INFORMATION SECTION OF THIS DOCUMENT. 



SEE THE XXOP* USER'S MANUAL FOR MORE DETAILS ON FLAGS. YOU MAT 
SPECIFY MORE THAN ONE FLAG WITH TM^ FLAG SWITCH, FOR EXAMPLE. 
TO CAUSE THE PROGRAM TO LOOP ON ERROR. INHIBIT ERROR REPORTS 
AND TYPE A "BELL" ON ERROR. YOU MAY USE THE FOLLOWING STRING: 

/FLAGS : LOE :IER: BOE 
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2.4 EXTENDED COMTIAND SYNTAX 
2.4.1 START COnrfAND - 



ST A( RT )/ TESTS : < TEST -LIS T > /PASS : <PASS CNT > /FLAGS : 
< FLAG - L 1ST > /EOP :< INCR > 



2.4.1.1 TESTS SWITCH ( /TESTS: < TEST LIST>) - 

<TEST-LIST> IS A SEQUENCE OF DECIMAL NUMBERS (1:2 ETC.) OR RANGES 
OF DECIMAL NUMBERS (1-5:8-10 ETO. SEPERATED BY COLONS. THAT SPECIFY 
THE TESTS TO BE EXECUTED. TESTS WILL BE EXECUTED IN NUMERICAL ORDER 
REGARDLESS OF THE ORDER OF SPECIFICATION. THE DEFAULT IS TO EXECUTE 
ALL TESTS. ON THIS AND ALL SWITCHES. THE ANGLE BRACKETS <> ARE 
PUNCTUATION USED IN THE DEFINITION ONLY. AND ARE NOT TO BE TYPED BY 
THE OPERATOR. SEE EXAMPLE AT END OF "EFFECT OF START COMMAND" 
SECTION. 



2.4.1.2 PASS SWITCH ( /PASS :<PASS -CNT > ) - 

<PASS-CNT> IS A DECIMAL NUMBER INDICATING THE DESIRED NUMBER OF 
PASSES. A PASS IS DEFINED AS THE EXECUTION OF THE FULL DIAGNOSTIC 
(ALL SELECTED TESTS). THE DEFAULT IS NON-ENDING EXECUTION. IN THIS 
CASE. EXIT FROM THE PROGRAM IS ACCOMPLISHED EITHER BY TYPING A 
CONTROL /C OR BY OCCURANCE OF AN ERROR WITH THE HALT ON ERROR FLAG 
BEING SET. THE EXIT IS A RETURN TO COMMAND MODE. SEE EXAMPLE AT END 
OF "EFFECT OF START COMMAND" SECTION. 



2.4.1.3 FLAGS SWITCH ( /FLAGS: <FLAG-LIST> ) - 

<FLAG-LIST> IS A SEQUENCE OF ELEMENTS OF THE FORM «FLAG>. 
<FLAG-1>, OR <FLAG-0>. SEPARATED BY COLONS. WHERE <FLAG> HAS ONE OF 
THE FOLLOWING VALUES: 

HOE HALT ON ERROR. CAUSING COMMAND MODE TO 

BE ENTERED WHEN AN ERROR IS ENCOUNTERED. 
LOE LOOP ON ERROR. CAUSING THE DIAGNOSTIC TO 

LOOP CONTINUOUSLY WITHIN THE SMALLEST 

DEFINED BLOCK OF CODING (SEC^MENT. SUBTEST. 

OR TEST) CONTAINING THE ERROR. 
lER INHIBIT ERROR REPORTING. 
IBE INHIBIT BASIC ERROR REPORTS. 
IXE INHIBIT EXTENDED ERROR REPORTS. 
PRI DIRECT ALL MESSAGES TO A LINE PRINTER. 
PNT PRINT NUMBER OF TEST BEING EXECUTED. 
BOE BELL ON ERROR (NOT RELATED TO BELL PROMPTING). 
UAM RUN IN UNATTENDED MODE. BYPASSING MANUAL 

INTERVENTION (ILLEGAL FOR THIS DIAGNOSTIC). 
ISR INHIBIT STATISTICAL REPORTS. 
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IDU INHIBIT DROPPING OF UNITS BT DIAGNOSTIC. 
(HAS NO EFFECT IN THIS DIAGNOSTIC.) 

LOT LOOP ON TEST. 
THE FLAGS NAMED OR EQUATED TO 1 ARE SET. THOSE EQUATED TO 0 ARE 
CLEARED. A FLAG NOT SPECIFIED IS CLEARED. IF THE FLAGS SWITCH IS NOT 
GIVEN ALL FLAGS ARE CLEARED. SEE EXAMPLE AT END OF "EFFECT OF START 
COMMAND" SECTION. 



2.4,1.4 END OF PASS SWITCH (/EOP:<INCR>) - 

<INCR> IS A DECIMAL NUMBER INDICATING HOU OFTEN (IN TERMS OF 
PASSES) IT IS DESIRED THAT THE END OF PASS MESSAGE BE PRINTED. THE 
DEFAULT IS AT THE END OF EVERY PASS. SEE EXAMPLE AT END OF "EFFECT OF 
START COMMAND" SECTION. 



2.4.1.5 EFFECT OF START COMMAND - 

THE EFFECT OF THE START COMMAND IS TO INITIATE THE HARDWARE 
PARAMETER DIALOGUE. THE SOFTWARE PARAMETER DIALOGUE. THE 
INITIALIZATION (aUESTIONS. AND THEN THE DIAGNOSTIC COMMENCES TESTING. 

THE HARDWARE PARAMETER DIALOGUE COMMENCES WITH THE QUESTION "0 
UNITS (D) ?" TO WHICH THE OPERATOR SHOULD REPLY WITH THE NUMBER OF 
UNITS TO BE TESTED. FOLLOWING THIS ARE THE QUESTIONS WHEREBY THE 
P-TABLES THEMSELVES ARE BUILT. EACH P-TABLE IS A CORE -RESIDENT TABLE 
CONTAINING ALL THE HARDWARE INFORMATION FOR ONE COMPLETE UNIT. EACH 
QUESTION IS FOLLOWED BY THE RESPONSE RADIX (D FOR DECIMAL. B FOR 
BINARY, 0 FOR OCTAL. L FOR YES/NO) IN PARENTHESES AND THE DEFAULT 
VALUE AFTER THE PARENTHESES. FOR THE ACTUAL HARDWARE P TABLE 
QUESTIONS SEE THE "HARDWARE PARAMETERS" SECTION. 

FOLLOWING THE HARDWARE QUESTIONS ARE THE SOFTWARE QUESTIONS TO 
BUILD THE SOFTWARE TABLES. WHICH DEFINE OPERATING PARAMETERS OF THE 
DIAGNOSTIC PROGRAM. THESE QUESTIONS ARE DESCRIBED IN THE "SOFTWARE 
PARAMETERS" SECTION. 

EXAMPLE: 

ST A/ TESTS : 1 : 3 -4 : /PASS : 3/FLAGS : lER : HOE • I 



THIS COMMAND WILL CAUSE THREE PASSES TO BE MADE, WITH EACH PASS 
CONSISTING OF TESTS 1.3. AND 4. THERE IS NO DIFFERENCE BETWEEN SAYING 
<FLAG> AND SAYING <FLAG-1>. THE NOTATION <FLAG-0> IS MEANINGFUL ONLY 
ON A COMMAND OTHER THAN START TO CLEAR A FLAG THAT WAS PREVIOUSLY SET. 
NOTE THAT ON ALL COMMANDS ONLY THE FIRST THREE LETTERS ARE SCANNED. 
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2. A. 2 RESTART COMMAND 



RES(TART)/TESTS:<TEST-LIST>/PASS:<PASS CNT>/FLAGS: 
<FLAG-LIST>/UNITS:<UNIT-LIST> 



2-4,2.1 TESTS. PASS. AND FLAGS SWITCHES 

<TEST-LIST>. <PASS-CNT>. AND <FLnG-LlST> ARE AS IN THE START 
COMMAND. 



2.4.2.2 UNITS SWITCH ( /UNITS :<UNIT -LIST >) - <UNIT-LIST> IS A SEQUENCE 
OF DECIMAL NUMBERS (0,1 ETC.) OR RANGES OF DECIMAL NUMBERS (0-5, 8-10 
ETC.) THAT SPECIFY THE UNITS TO BE TESTED. THE NUMBERS ARE SEPARATED 
BY COLONS. THE NUMBERS MAY RANGE FROM 0 THRU N 1 (N IS THE NUMBER OF 
UNITS SPECIFIED IN THE PREVIOUS START COMMAND). THE NUMBER INDICATES 
THE POSITION OF THE P- TABLE AS THE DATA WAS ENTERED DURING THE 
HARDWARE DIAGLOGUE. THE UNITS WHICH ARE SELECTED MUST NOT HAVE BEEN 
DROPPED BY THE DROP COMMAND. SEE THE DISCUSSION OF ADD AND DROP 
COMMANDS BELOW. DEFAULT IS TO TEST ALL UNITS WHICH HAVE NOT BEEN 
DROPPED BY A DROP COMMAND. 



2.4.2.3 EFFECT OF RESTART COMMAND 

THE RESTART COMMAND DIFFERS FROM THE START COMMAND IN THAT THE 
P-TABLES FROM THE PREVIOUS START COMMAND (THERE MUST HAVE BEEN ONE) 
ARE USED. INSTEAD OF NEW ONES BEING BUILT. THE UNITS SWITCH SHOULD 
NOT BE USED WITH THIS PROGRAM. THE SOFTWARE DIALOGUE MAY OPTIONALLY 
BE REEXECUTED (OPERATOR WILL BE ASKED). THE COMMAND CAN BE USED AFTER 
COMr*AND MODE HAS BEEN REENTERED IN ANY OF THE THREE NORMAL WAYS: A) 
THE REQUESTED NUMBER OF PASSES HAVE BEEN MADE. B) AN ERROR WAS 
ENCOUNTERED WITH THE HALT ON ERROR FLAG SET. OR C) A CONTROL /C WAS 
ENTERED BY THE OPERATOR. 



2.4.3 CONTINUE COMMAND - 

CON(TINUE)/PASS:<PASS-CNT/FLAGS:<FLAG LIST> 
*********************************************************** 



2.4.3.1 FLAG SWITCH (/FLAGS: <FLAG-LIST> ) - 

*FLAG-LIST> IS SAME AS IN THE START COMMAND. BUT UNSPECIFIED 
FLAGS RETAIN THEIR CURRENT VALUE. 
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2.4.3.2 EFFECT OF CONTINUE COMMAND 

CONTINUE MiJST FOLLOW A START OR RESTART. AND COMMAND MODE MUST 
HAVE BEEN ENTERED DUE TO A HALT ON ERROR OR A CONTROL/C. THE EFFECT 
or THE COMMAND IS TO GO TO THE BEGINNING OF THE TEST THAT WAS BEING 
EXECUTED WHEN THE HALT OR CONTROl/C TOOK PLACE. SOFTWARE DIALOGUE MAY 
OPTIONALLY BE REEXECUTEO. HARDWARE PARAMETERS MAY NOT BE CHANGED. 



2.4.4 PROCEED COMMAND 
PROCCEED)/FLAGS:<FLAG-LIST> 



2.4.4.1 FLAGS SWITCH (/FLAGS:<FLAG-LIST> ) 

<FLAG-LIST> IS AS IN THE START COMMAND. BUT UNSPECIFIED FLAGS 
RETAIN THEIR CURRENT VALUE. 



2.4.4.2 EFFECT OF PROCEED COMMAND 

PROCEED MUST FOLLOW A START. RESTART. OR CONTINUE, COMMAND MODE 
MUST HAVE BEEN ENTERED VIA A HALT ON ERROR. THE EFFECT OF THE COMMAND 
IS TO BEGIN EXECUTION AT THE LOCATION FOLLOWING THE ERROR CALL. 
NEITHER HARDWARE NOR SOFTWARE PARAMETERS MAY BE ALTERED. 



2.4.5 ADD COMMAND - 

********************************************** ************* 

ADD/UNITS: <UNIT-LIST> 



2.4.6 EFFECT OF ADD COMMAND - 

THE UNITS SPECIFIED ARE ADDED TO THE TEST SEQUENCE. EACH 
UNIT MUST HAVE A P- TABLE IN MEMORY DUE TO AN EARLIER 
HARDWARE DIALOGUE. THIS COMMAND MUST BE FOLLOWED BY A 
RESTART OR CONTINUE. THE UNITS SWITCH MUST BE SPECIFIED. 
THE ADD COMMAND IS MEANINGFUL ONLY FOR UNITS THAT WERE 
PREVIOUSLY DROPPED. 



2.4,7 DROP COMMAND - 

*********************************************************** 

DROCP)/UNITS:<UNIT LIST> 

*********************************************************** 
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2.4.8 ErrECT OF DROP COMMAND 

THE UNITS SPECiriED UILL BE DROPPED FROM TESTING. THE UNITS 
WILL BE RESELECTED ONLY Br THE EXECUTION OF AN ADD OR START 
COMMAND. THE UNITS SWITCH MUST BE ENTERED. THIS COMMAND 
MUST BE FOLLOWED Br A RESTART OR A CONTINUE COMMAND. 



2.4,9 PRINT COMMAND - 
PRICNT) 



2.4,9.1 EFFECT OF PRINT COMMAND 

THE TOTAL NUMBER OF ERRORS FOR EACH UNIT SINCE THE LAST 
START OR RESTART COMMAND ARE PRINTED. THE ISR (INHIBIT 
STATISTICAL REPORTING) FLAG IS CLEARED. 



2.4.10 DISPLAY COMMAND - 
DISCPLAY )/UNITS:<UNIT.LIST> 



2.4.10.1 EFFECT OF DISPLAY COMMAND 

THE HARDWARE P- TABLE FOR THE TEST STATION IS PRINTED IN THE 
FORMAT IN WHICH IT WAS ENTERED. 



2.4.11 FLAGS COMMAND - 
FLA(GS) 



2.4.11.1 EFFECT OF FLAGS COMMAND - 

THE CURRENT SETTINGS OF ALL FLAGS ARF PRINTED. 
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2.4,12 ZFLAGS COMMAND 
ZrL(AGS) 



2.4.13 ZFLAGS COMMAND 

ALL FLAGS ARE CLEARED. 

2.4.14 CONTROL CHARACTERS - 

C A CONTROL/C (C) ENTERED DURING THE EXECUTION OF A 
DIAGNOSTIC CAUSES A RETURN TO COMMAND MODE. 

Z A CONTROL/Z (Z) ENTERED DURING ONE OF THE TWO 
OPERATOR DIALOGUES-- HARDWARE P TABLE DIALOGUE OR 
SOFTWARE P- TABLE DIALOGUE CAUSES THE DEFAULTS TO BE 
TAKEN FOR THE REMAINDER OF THAT DIALOGUE. 

0 A CONTROL/0 (0) ENTERED DURING THE EXECUTION OF A 
DIAGNOSTIC CAUSES ALL TELETYPE OUTPUT TO BE 
SUPPRESSED FOR THE REMAINDER OF THE DIAGNOSTIC OR 
UNTIL ANOTHER CONTROL/0 IS TYPED. WHICH RESTORES 
NORMAL TELETYPE OUTPUT. 



B. 
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HARDWARE QUESTIONS 

W-CN A DIAGNOSTIC IS STARTED. THE RUNTIME SERVICES WILL PROMPT 
THE USER FOR HARDWARE INFORMATION BY TYPING "CHANGE MU (L) ?" 
too MUST ANSWER "V" AFTER A START COMMAND UNLESS THE HARDWARE 
INFORMATION HAS BEEN "PRELOADED" USING THE SETUP UTlLITv (SEE 
CHAPTER 6 OF THE XXDP* USER'S MANUAL). WHEN YOU ANSWER THIS 
QUESTION WITH A "Y". THE RUNTIME SERVICES WILL ASK FOR THE NUMBER 
OF UNITS (IN DECIMAL). YOU WILL THEN BE ASKED THE FOLLOWING 
QUESTIONS FOR EACH UNIT. 



1. CSR ADDRESS - THIS QUESTION REQUESTES THE CSR ADDRESS OF THE 
SPECIFIED DHU-Il. THE DEFAULT ANSWER FOR THIS QUESTION IS 
ADDRESS L60460 (OCTAL). 

2. INTERRUPT VECTOR ADDRESS THIS QUESTION REQUESTS THE INTERRUPT 
VECTOR ADDRESS OF THE SPECIFIED DHU-ll. THE DEFAULT ANSWER IS 
510 (OCTAL). 

5. ACTIVE LINES BIT MAP - THIS QUESTION REQUESTS AN OCTAL BIT 

MAP OF THE SERIAL COMMUNICATION LINES ON THE DHUll WHICH ARE 
BEING SELECTED FOR TESTING. IF THE BIT IN THE BIT MAP IS SET 
WHICH CORRESPONDS TO A PARTICULAR LINE (I.E. BIT 5 FOR LINE 
5 ) THAT LINE WILL BE TESTED BY THE FVT. 

4. BR LEVEL - THIS QUESTION REQUESTS THE INTERRUPT BR LEVEL OF 
THE SPECIFIED OHU-11. THE DEFAULT ANSWER IS BR 5. 
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P.b SOTUARE QUESTIONS 

AFTER YOU HAVE ANSUERED THE HARDWARE QUESTIONS OR AFTER A RESTART 

OR CONTINUE COMMAND. THE RUNTIME SERVICES WILL ASK FOR SOFTWARE 

PARAMETERS. THESE PARAMCTERS WILL GOVERN SOME DIAGNOSTIC SPECIFIC 

OPERATION MODES. YOU MILL BE PROMPTED BY "CHANGE SW (L) ?" 

IF YOU WISH TO CHANGE ANY PARAMETERS. ANSWER BY TYPING 

"Y". THE SOFTWARE QUESTIONS AND THE DEFAULT VALUES ARE DESCRIBED 

IN THE NEXT PARAGRAPHC S ) . 

1. REPORT UNIT NUMBER AS EACH UNIT IS TESTED - THIS QUESTION ASKS 
WHETHER THE PROGRAM SHOULD REPORT THE NUMBER OF THE UNIT WHICH 
IT IS TESTING AS IT BEGINS TO TEST THAT UNIT. 

2. ROM VERSION PRINTOUT ON THE FIRST PASS - THIS QUESTION ASKS 
WHETHER THE PROGRAM SHOULD PRINTOUT THE VERSIONS OF THE ON 
BOARD PROCFSSOR ROMS DURING THE FIRST PASS OF THE PROGRAM. 

3. EXTENDED ERROR REPORTING • THIS QUESTION ASKS WHETHER EXTENDED 
ERROR INFORMATION IS REQUIRED OTHER THAN THE "TEST FAILED" 
MESSAGE. ON EACH ERROR REPORTED. THE DEFAULT IS "NO" I.E. ONLY 
A MESSAGE REPORTING THE FACT THAT THE TEST FAILED WiLL BE 
PRINTED. 

4. NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE THIS 
QUESTION IS ASKED ONLY IF THE PREVIOUS QUESTION WAS ANSWERED 
":ES". THE QUESTION ASKS FOR THE NUI-QER OF DATA ERRORS WHICH 
SHOULD BE REPORTED INDIVIDUALLY BY THIS PROGRAM FOR EACH LINE 
FOR EACH TRANSMISSION TEST. ERRORS WHICH ARE NOT REPORTED 
INDIVIDUALLY ARE REPORTED IN SUMMARY ERROR REPORTS. 
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^. T EXTENDED P TABLE DIALOGUE 

UHEN i&J ANSWER THE HARDWARE QUESTIONS. YOU ARE BUILDING ENTRIES 
IN A TABLE THAT DESCRIBES THE DEVICES UNDER TEST. THE SIMPLEST 
WAY TO BUILD THIS TABLE IS TO ANSWER ALL QUESTIONS FOR EACH 
OIIT TO BE TESTED. IF YOU HAVE A MULTIPLEXFr, DEVICE SUCH AS 
A MASS STORAGE CONTROLLER WITH SEVERAL DRIVES OR A COMMUNICATION 
DEVICE WITH SEVtaAL LINES. THIS BECOMES TEDIOUS SINCE MOST OF 
THE ANSWERS ARE REPETITIOUS. 

TO ILLUSTRATE A MORE EFFICIENT METHOD, SUPPOSE YOU ARE TESTING 
A FICTIONAL DEVICE. THE XYll. SUPPOSE THIS DEVICE CONSISTS OF 
A CONTROL MOOUl.E WITH EIGHT UNITS ( SUB -DEVICES ) ATTACHED TO IT. 
THESE l^ITS ARE DESCRIBED BY THE OCTAL NUMBERS 0 THROUGH 7. THERE 
IS ONE HARDWARE PARAMETER THAT CAN VARY AMONG UNITS CALLED THE 
Q-FACTOR. THIS Q-FACTOR MAY BE 0 OR 1. BELOW IS A SIMPLE WAY 
TO BUILD A TABLE FOR ONE XYll WITH EIGHT UNITS. 

« UNITS (0) ? 8<CR> 

UNIT 1 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE « (0) ? 0<CR> 
Q-FACTOR (0) 0 ? 1<CR> 

UNIT 2 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE ♦ CO) ? 1<CR> 
Q-FACTOR CO) I ? 0<CR> 

UNIT 3 

CSR ADDRESS (0) ? 160000<CR> 
SUB DEVICE ♦ CO) ? 2<CR> 
Q-FAC^OR CO) 0 ? <CR> 

UNIT 4 

CSR ADDRESS CO) 7 160000<CR> 
SLe-OEVICE ♦ CO) ? 3*CR> 
Q-FACTOR CO) 0 ? <CR> 

UNIT 5 

CSR ADDRESS CO) ? 160000<CR> 
SUB -DEVICE ♦ CO) ? 4<CR> 
Q-FACTOR CO) 0 ? <CR> 

UNIT 6 

CSR ADDRESS CO) 7 160000<CR> 
SUB-DEVICE • CO) ? 5<CR> 
Q FACTOR CO) 0 ? <CR> 

UNIT 7 

CSR ADDRESS CO) ? 160000<CR> 
SUB-DEVICE # CO) ? 6<CR> 
Q-FACTOR CO) 0 ? 1<CR> 
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UNIT 8 

CSR ADDRESS (0) 160000<CR> 
SUB-DEVICE # (0) ? 7<CR» 
Q-FACTOR (0) 1 ? «CR' 

NOTICE THAT THE DEFAULT VALUE FOR THE Q-FACTOR CHANGES WHEN A 
NON DEFAULT RESPONSE IS GIVEN. BE CAREFUL WHEN SPECIFYING 
MUTIPLE UNITS! 

AS YOU CAN SEE FROM THE ABOVE EXAMPLE. THE HARDWARE PARAMETERS 

DO NOT VARY SIGNIFICANTLY FR&I UNIT TO UNIT. THE PROCEDURE SHOWN IS 

NOT VERY EFFICIENT. 

THE RLWTIME SERVICES CAN TAKE MULTIPLE ^M1J SPECIFICATIONS HOWEVER. 
LET'S BUILD THE SAME TABLE USING THE MULTIPLE SPECIFICATION 
FEATURE. 

• UNITS (0) ? 8<CR> 
UNIT 1 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE ♦ (0) ? 0,1<CR» 
Q-FACTOR (0) 0 ? 1,0<CR> 

UNIT 3 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE « (0) ? 2-5<CR> 
Q-FACTOR (0) 0 ? 0*CR> 

UNIT 7 

CSR ADDRESS (0) ? 160000<CR> 
SUB-DEVICE ♦ (0) ? 6.7<CR> 
Q-FACTOR (0) 0 ? 1<CR> 

AS YOU CAN SEE IN THE ABOVE DIALOGUE. THE RUNTIME SERVICES WILL 
BUILD AS MANY ENTRIES AS IT CAN WITH THE INFORMATION GIVEN IN ANY 
ONE PASS THROUGH THE QUESTIONS. IN THE FIRST PASS. TWO ENTRIES 
ARE BUILT SINCE TWO SUB-DEVICES AND Q -FACTORS WERE SPECIFIED. THE 
SERVICES ASSUME THAT THE CSR ADDRESS IS 160000 FOR BOTH SIICE IT 
WAS SPECIFIED ONLY ONCE. IN THE SECOND PASS. FOUR ENTRIES WERE 
BUILT. THIS IS BECAUSE FOUR SUB -DEVICES WERE SPECIFIED. THE 
"-" CONSTRUCT TELLS THE RUNTIME SERVICES TO INCREMENT THE DATA 
FROM THE FIRST NUMBER TO THE SECOND. IN THIS CASE. SUB-DEVICES 
2. 3. 4 AND 5 WERE SPECIFIED. (IF THE SUB-OEVICE WERE SPECIFIED 
BY ADDRESSES. THE INCREMENT WOULD BE BY 2 SINCE ADDRESSES MUST 
BE ON AN EVEN BOUNDARY.) THE CSR ADDRESSES AND Q-FACTORS FOR 
THE FOUR ENTRIES ARE ASSUMED TO BE 160000 AND 0 RESPECTIVELY 
SINCE THEY WERE ONLY SPECIFIED ONCE. THE LAST TWO UNITS ARE 
SPECIFIED IN THE THIRD PASS. 

THE WHOLE PROCESS COULD HAVE BEEN ACCOMPLISHED IN ONE PASS AS 
SHOWN BELOW. 

♦ LWITS (D) ? 8<CR> 
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UNIT 1 

CSR ADDRESS (0) ? 160000<CR> 
SOB-DEVICE ♦ (0) ? 0 7<CR> 
Q-PACTOR CO) 0 ? 0.1.0....1.1<CR> 

AS rOU CAN SEE FROM THIS EXAMPLE. NULL REPLIES (COMMAS ENCLOSING 
A NULL FIELD) TELL THE RUNTIME SERVICES TO REPEAT THE LAST REPLr. 



2.8 QUICK START-UP PROCEDURE (XXOPO 
TO START-UP THIS PROGRAM: 

1. BOOT XXOP» 

2. GIVE THE DATE AND ANSWER THE LSI/UNIBUS AND 50HZ (IF THERE 
IS A CLOCK) QUESTIONS. NOTE. NOT ALL VERSIONS OF XXDP» ASK 
FOR THE CLOCK FREQUENCY 

3. TYPE "R NAME". WHERE NAME IS THE NAME OF THE BIN OR 
BIC FILE FOR THIS PROGRAM 

4. TYPE "START" 

5. ANSWER THE "CHANGE HW" QUESTION WITH "Y" 

6. ANSWER ALL THE HARDWARE QUESTIONS 

7. ANSWER THE "CHANGE SW" QUESTION WITH "N" 

WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USING ONLY THE 

DEFAULTS FOR FLAGS AND SOFTWARE PARAMETERS. FOR DEFAULT INFORMATION 

SEE THE SECTIONS WITHIN THIS DOCUMENT ON FLAGS. AND HARDWARE QUESTIONS. 
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3.0 ERROR INFORMATION 

3.1 TYPES OF ERROR MESSAGES 

THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY BE ISSUED Bf 
A DIAGNOSTIC: GENERAL. BASIC AND EXTENDED. GENERAL ERROR MESSAGES 
ARE ALWAYS PRINTED UNLESS THE "lER" FLAG IS SET CSEE THE FLAGS SECTION 
OF THIS DOCUMENT). 

THE GENERAL ERROR MESSAGE IS OF THE FORM: 

NAME TYPE NUMBER ON UNIT NUMBER TST NUMBER PC:XXXXXX 
ERROR MESSAGE 

. WHERE i NAME - DIAGNOSTIC NAME 

TYPE ■ ERROR TYPE (SYS FATAL, DEV FATAL. HARD OR SOFT) 
NUMBER - ERROR NUMBER 

UNIT NUMBER - 0 - N CN IS LAST UNIT IN PTABLE) 
TST NUMBER - TEST AND SUBTEST WHERE ERROR OCCURRED 
PCiXXXXXX - ADDRESS OF ERROR MESSAGE CALL 

BASIC ERROR MESSAGES ARE MESSAGES THAT CONTAIN SOME ADDITIONAL 
INFORMATION ABOUT THE ERROR. THESE ARE ALWAYS PRINTED UNLESS 
THE "lER" OR "IBR" FLAGS ARE SET CSEE THE FLAGS SECTION OF THIS 
DOCUMENT). 

THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL MESSAGE. 

EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY ERROR INFORMATION 
SUCH AS REGISTER CONTENTS OR GOOD/BAD DATA. THESE ARE ALWAYS 
PRINTED UNLESS THE "lER". "IBR" OR "IXR" FLAGS ARE SET (SEE THE 
FLAGS SECTION OF THIS DOCUMENT). 

THESE MESSAGES ARE PRINTED ArTER THE ASSOCIATED GENERAL ERROR 
MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES. 
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5.2 SPECIFIC ERROR MESSAGES 

THIS PROGRAM IS INTENDED TO PROVIDE A GQ/NOGO INDICATION 
or THE FUNCTICWALITY OF THE DHU-H BOARDS. TO EXECUTE THE 
PROGRAM IN THIS MODE THE OPERATOR NEED ONLY ANSWER THE 
"EXTENDED ERROR REPORTING" SOFTWARE QUESTION WITH "NO". THE 
PROGRAM WILL THEN ONLY PRINT THE NAME OF THE FAILING TEST 
THE TEST AND ERROR NUMBERS. FOR A LIST OF THE TEST NAMES 
IN THIS PROGRAM SEE THE TEST SUMMARIES SECTION OF THIS 
DOCUMENT. AN EXAMPLE OF SUCH A AN ERROR MESSAGE IS THE 
FOLLOWING : 

CZDHU OVC FTL ERR 01603 ON UNIT 02 TST 16 SUB 000 PC: XXXXXX 
TEVICE REGISTER WORD READ/WRITE TEST FAILED. 

THIS ERROR INDICATES THAT A FATAL ERROR WAS ENCOUNTERED WITHIN 
THE TEST WHICH TESTS THE READ/WRITE CAPABILITY OF THE DHU II 
REGISTERS, 

IF THE OPERATOR HAD REQUESTED EXTENDED ERROR REPORTING THE 
SAME ERROR WOULD BE REPORTED AS FOLLOWS: 

CZDHU OVC FTL ERR 01603 ON UNIT 02 TST 16 SUB 000 PC: XXXXXX 
DEVICE REGISTER WORD READ/WRITE TEST FAILED. 

BAD BIT(S) IN DEVICE TBUFFAOl REGISTER FOR LINE 7 (D). 

EXPECTED DATA: 000000 (0). 

ACTUAL DATA: 000023 (0). 



4.0 PERFORMANCE AND PROGRESS REPORTS 

AT THE END OF EACH PASS. THE PASS COUNT IS GIVEN ALONG WITH THE 
TOTAL NUMBER OF ERRORS REPORTED SINCE THE DIAGNOSTIC WAS STARTED. 
THE "EOP" SWITCH CAN BE USED TO CONTROL HOW OFTEN THE END 
OF PASS MESSAGE IS PRINTED. FOR FuTHER INFORMATION SEE THE 
SWITCHES SECTION OF THIS DOCUMENT. 
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5.0 TEST SUMMARIES 



THE FOLLOWING ARE INCLUDED WITHIN CZDHUB: 

1, DEVICE REGISTER ACCESS TEST - VERIFIES THAT THE UUT REGISTERS 
WILL RESPOND WITH THE CORRECT UNIBUS HANDSHAKING SIGNALS. 
VERIFIES THAT THE UUT IS AT THE CORRECT ADDRESS. 

2. MASTER. RESET (SELFTEST) TEST - VERIFIES THAT THE MASTER. RESET 
BIT CLEARS WITHIN A SPECIFIED TIME OF IT BEING Sf . 

5. MASTER. RESET (SKIP SELFTEST) TEST - VERIFIES THAT THE MASTER 
RESET CLEARS WITHIN A SHORT TIME AFTER IT IS SET WHEN THE 
SKIP SELFTEST SEQUENCE IS USED. 

4. RX. CHARACTER FIELD TEST - VERIFIES THAT THE DATA BITS OF THE 
CODES IN THE RXFIFQ AFTER A MASTER RESET AND SKIP SELFTEST 
ARE CONSISTANT WITH THE SKIP SELFTEST COOES. 

5. RX.FLAG FIELD TEST - VERIFIES THAT THE 5 DATA STATUS BITS 
( OVERRUN. FRAMTNG AND PARITY ERROR BITS) ARE ALL SET ON 
EACH OF THE SKIP SELFTEST COOES IN THE FIFO AFTER A MASTER 
RESET AND SKIP SELFTEST SEQUENCE. 

6. RX. DATA. AVAIL TEST - VERIFIES THAT THE RX. DATA. AVAIL BIT IS 
SET WHEN THE SKIP SELFTEST CODES ARE IN THE FIFO AND THAT 
IT CLEARS AFTER THEY HAVE BEEN READ. 

7. RX.DATA.V ^10 TEST - VERIFIES THAT THE RX .DATA . VALID BIT IS 
SET FOR /wL THE COOES IN THE FIFO AND CLEAR AFTER ALL THE 
COOES HAVE BEEN READ. 

8. RX.LINE FIELD TEST - VERIFIES THAT THE RX.LINE LINE FIELDS ARE 
CORRECT FOR THE SKIP SELFTEST COOES. 

9. BMP CHECK TEST - VERIFIES THAT THE OUT DOES NOT IMMEDIATELY 
FAIL THE BACKGROUND MONITOR PROGRAM. AS THIS MAY INVALIDATE 
FURTHER TESTS. 

10. SKIP SELFTEST TEST - VERIFIES THAT THE OUT SKIPS THE SELFTEST 
IN THE TIME ALLOWED. AND THAT THE FIFO CONTAINS THE CORRECT 
CODES AFTER ITS COMPLEATION. 

11. DIAGNOSTIC. FAIL CSKIP SELFTEST) TEST - VERIFIES USING THE 
SKIP SELFTEST SEQUENCE THAT THE OIAG.FAIL BIT GOES TO BOTH 
THE ACTIVE AND INACTIVE STATES WITHIN THE ALLOWED TIMES. 

12. SELFTEST TEST - VERIFIES THAT THE OUT'S SELFTEST EXECUTES 
WITHIN THE CORRECT TIME AND THAT THE CORRECT COOES ARE 
RETURNED IN THE FIFO AFTER ITS COMPLEATION. 

13. SELFTEST FAIL TEST - VERIFIES THAT THE OUT WILL REPORT 
ERRORS CORRECTLY WHEN IT IS FORCED TO FAIL. 
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14. ROM VERSION NUMBER - VERIFIES THAT THE ROM VERSION NUMBERS 
ARE REPORTED CORRECTLY AND IF REQUESTED PRINTS THEM OUT. 

15. CSR BIT 4 TEST VERIFIES THAT UHEN SET THIS BIT CAUSES 
THE SELF TEST TO LOOP. AND WHEN CLEARCD THE SKIP SELF TEST 
COOES ARE RETURNED IN THE RXFIFO. 

16. WORD ACCESS READ/URITE TEST - VERIFIES THAT THE REGISTERS 
RESPOND CORRECTLY TO READ AND URITE ACCESSES. 

17. WORD ACCESS READ/MODIFY/URITE TEST - VERIFIES THAT THE 
REGISTERS UILL RESPOND CORRECTLY TO READ/MODIFY/URITE ACCESES. 

18. BYTE ACCESS READ/URITE TEST - VERIFIES THAT THE REGISTERS WILL 
RESPOND CORRECTLY TO BYTE READ/URITE ACCESSES. 

19. BYTE ACCESS READ/MOOIFY/WRITE - VERIFIES THAT THE REGISTERS 
UILL RESPOW CORRECTLY TO BYTE READ/MODIFY/URITE ACCESSES. 

20. ID. BIT TEST - VERIFIES THAT THE ID BIT READS AS SET. 

21. TX. ENABLE (INACTIVE) TEST - VERIFIES THAT WHEN A LINE'S TX.ENBL 
BIT IS CLEAR. TRANSMISSION UILL NOT TAKE PLACE ON THAT LINE. 

22. TX, ENABLE (ACTIVE) TEST - VERIFIES THAT WHEN A LINE'S TX,ENBL 
BIT IS SET. TRANSMISSION UILL TAKE PLACE ON THAT LINE. 

23. INTERRUPT TEST - VERIFIES THAT THE OUT UiLL GENERATE RECEPTION 
AND TRANSMISSION INTERRUPTS CORRECTLY. 

24. BR LEVEL TEST - VERIFIES THAT THE OUT INTERRUPTS AT THE CORRECT 
BUS REQUEST LEVEL. 

25. DIAGNOSTIC FIELD (BMP) TEST - VERIFIES THAT A REQUEST TO THE 
OUT TO REPORT BMP STATUS COOES IS COMPLIED WITH UITHIN THE 
SPECIFIED TIME. ALL ACTIVE LINES ARE TESTED. 

26. REPORT BMP COOES TEST - THIS PSEUOO TEST REPORTS THE FIRST 32 
BMP CHARACTERS UHICH UERE DISCOVERED IN THE FIFO DURING THE 
EXECUTION OF THE OTHER TESTS. THIS AVOIDS INTERRUPTION OF THE 
OTHER TESTS BY THESE COOES IF THEY ARE NOT CRITICAL TO THE 
PERFORMANCE OF THE TESTS. 



I<2 

Pl^Bri^M Fo'^Jt'^uV'**^ PARTI MACRO M1200 15 MAR 84 09:15 PAGE 23 

6.0 EXAMPLE ERROR FREE PASS 

THE FOLLOWING IS AN EXAMPLE OF AN ERROR FREE PASS DIALOGUE 

.R CZOHUBO 
CZOHUBO.BIN 



DRS 

CZDHU-B-0 

OMU-ll FUNC TST PARTI 
UNIT IS DHU-11 
RESTRT ADOR: 147670 
0R>STA/PAS:1 

CHANGE HU (L) ? Y 

# UNITS CD) ? a 

UNIT 0 

CSR ADDRESS: (0) 160460 ? tZ 
UNIT 1 

CSR ADDRESS: (0) 160460 ? 160500 
INTERRUPT VECTOR ADDRESS: (0) 310 ? 320 
ACTIVE LINE BIT MAP: (0) 177777 ? <CR> 
INTERRUPT BR LEVEL: (0) 5 ? <CR> 

CHANGE SW CD ? Y 

REPORT UNIT NUMBER AS EACH UNIT IS TESTED: (L) Y ? <CR> 
ROM VERSION PRINTOUT ON THE FIRST PASS: (L) Y ? <CR> 
EXTENDED ERROR REPORTING: (L) N ? Y 

NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE: (D) 
TESTING UNIT 0(0) 

ROM VERSION NUMBERS: PROC_l - 2C0) PR0C_2 • 2(D) 
TESTING UNIT 1(0) 

ROM VERSION NUMBERS: PROC.l • 2(D) PR0C_2 - 2(D) 

CZDHU EOP 1 
0 TOTAL ERRS 

DR> 
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1075 
1074 
1062 
10S3 
1064 
1065 
1066 
1087 
1086 
1089 
1090 
1091 
1092 
109S 
1094 
1095 
1096 
1097 
1096 
1099 
1100 
1101 
1102 
1103 
1104 
1105 
1106 
1107 
1108 
1109 
1110 

nil 

1112 
1113 
1114 
1115 
1116 
1117 
1118 
1135 
1136 



000000 



000000 



002000 



002000 



002000 
002000 
002000 
002001 
002002 
002003 
002004 
002005 
002006 
002007 
002010 



000001 
000001 
000001 
000001 
000001 



002000 



103 
132 
104 
110 
125 
000 
000 
000 



.LIST SEQ.LOC.BIN.MEB 
.NLIST CNO 



,SBTTL PROGRAM HEADER 



.MCALL SVC 
SVC 



! INITIALIZE SUPERVISOR MACROS 



IF STRUCTURED MACROS ARE TO BE USED. ADD ".MCALL STRUCT" AND 
TO INITIALIZE THE STRUCTURED MACROS. 



'STRUCT' 



SVCINS' 1 

SVCTST- 1 

SVCSUB" 1 

SVCGBL- 1 

SVCTAG- 1 



; LIST INSTRUCTIONS. SHIFTED RIGHT 
I LIST TEST TAGS. SHIFTED RIGHT 
t LIST SUBTEST TAGS. SHIFTED RIGHT 
: LIST GLOBAL TAGS. SHIFTED RIGHT 
8 LIST OTHER TAGS, SHIFTED RIGHT 



CHANGE THE VALUES OF THE SVC... SYMBOLS TO BE ZERO IF YOU WISH 
TO ALIGN THE MACRO CALLS AND THEIR EXPANSIONS. CHANGE THE 
SYMBOLS TO BE MINUS -ONE TO NOT LIST THE EXPANSIONS. YOU MAY 
CHANGE THE SYMBOLS AT ANY POINT IN YOUR PROGRAM. 



.ENABL ABS 
i.ENABL AMA 



2000 



BGNMOO 



THE PROGRAM HEADER IS THE INTERFACE BETWEEN 
THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR. 



i - ■ 



POINTER BGNRP T . BGNS W . BGNSF T . BGNDU . ERR TBL 



HEADER CZDHU.B.0.16.0.PRI07 



LiNAME: 



LtREV; 



.ASCII /C 
•ASCII /Z' 
.ASCII /D/ 
.ASCII /H/ 
.ASCII /U/ 
.BYTE 
.BYTE 
.BYTE 



0 
0 
0 





fUNC TST 


SJ\Jc\J 1 SJ 




002011 




WcVX X 










www 


WCv A** 






000016 

WW X w 






Wcx/Xv 


V^V ( w 








057072 








OOPP 1 P 






AOPAP4 


OOPPP4 






OOPOP6 


0S74S4 


00P030 






oooooo 

www 






002032 


oooooo 


0020S4 






oooooo 

www 


0020S6 




0020S6 


oooooo 

www 


002040 




002040 


002124 

wc 






00P04P 


OOO340 

WW V 


002044 






oooooo 

www 








oroooo 

W WW 


0020S0 






OOX 


0020^1 


003 

Ww 






0020^2 


OOOOOO 
www 




OOOOOO 
www 


0020^ 




002056 


OOOOOO 

www 


002060 

WC WwV 




0O2060 


0O4O36 






002062 


0P4PPP 


002064 




002064 


oooooo 

wwvw 


002066 




002066 


oooooo 

www 


002070 






oooooo 

www 


002072 




002072 


02S076 


002074 




002074 


oooooo 


002076 




002076 


004046 
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/R/ 


LIOEPO: : 








.ASCII 


/o/ 


LIUNIT : : 








.UORD 


0 


LITIML: : 








.UORD 


16 


L f HPCP : : 








.UORD 


LtHARD 


L ) SPCP : : 








.WORD 


LiSOTT 


DHPTP: : 








.WORD 


LtHU 


LtSPTP: : 








.UORD 


L*SU 


L$LAOP: : 








.UORD 


L*LAST 


LISTA: : 








.UORO 


0 


L*CO: : 








.WORD 


0 


LIOTrP: : 








.UORD 


0 


L $APT : : 








.WORD 


0 


L$DTP: : 








.UORO 


L$DISOAl 


LIPRIO: 








' .UORD 


PR 10 7 


L>ENVI: 








' .WORD 


0 


LSEXPl: 








' .UORD 


0 


LfMREV: 








.BYTE 


c»REvis; 




.BYTE 


C»EDIT 


L$EF: : 








.UORD 


0 




.UORD 


0 


L»SPC: : 








.UORD 


0 


LtOEVP: 








' .UORD 


L$DVTyP 


L tREPP : 








.UORD 


L$RPT 


L$EXP4: 








' .UORO 


0 


LIEXPS: 








' .UORO 


0 


L >AUT : : 








.UORD 


0 


L«OUT: : 








.UORD 


L»Oi. 


L«LUN: : 








.UORD 


0 


LtOESP: 








*.UORD 


LIOESC 



mokk '^^"^ ""^'^ 

002100 

002100 104035 
002102 

002102 003766 
002104 

002104 024236 
002106 

002106 025060 
002110 

002110 025056 
002112 

002112 024230 
002114 

002114 000000 
002116 

002116 000000 
002120 

002120 000000 

1137 
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LILOAO: 








EMT 


EiLOAD 


u»ETP: : 








.UORO 


LIERRTBL 


L$ICP: s 








.UORO 


L»INIT 


L»CCP: : 








.WORD 


LSCLEAN 


LtACP: : 








.UORD 


LtAUTO 


L$PRT: : 








.UORD 


L»PROT 


LITEST: 








' .UORD 


0 


LIOLY: : 








.UORO 


0 


LiHIME: 








' .UORO 


0 



CrOHUBO OMU 11 K*IC TbT PARTI 
OISPMTCM T(WL£ 



1150 

115S 
1154 
1155 
ll«6 
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.SBTTL DISPATCH TABLE 

!*THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS Or EACH TEST. 

J IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST. 

t 



1157 



002122 




DISPATCH 26 




002122 


0000 S2 


.WORD 


26 


002124 




LIDISPATCH: : 




002124 


0252 14 


.WORD 


Tl 


002126 


025476 


.WORD 


T2 


002150 


025726 


.UORO 


T3 


002 1S2 


026172 


.UOPO 


T4 


0021S4 


026570 


.WORD 


T5 


0021S6 


026562 


.WORD 


To 


002140 


027000 


.WORD 


T/ 


002142 


027206 


.WORD 


T8 


002144 


027414 


.UORO 


T9 


002146 


027610 


.UORO 


TIC 


002150 


OS0024 


.UORO 


Til 


002152 


050252 


.UORO 


T12 


002154 


050546 


.UORO 


T15 


002156 


051054 


.UORO 


T14 


002160 


051434 


.UORO 


T15 


002162 


051776 


.UORO 


T16 


002164 


052244 


.UORO 


T17 


002166 


052454 


.UORO 


T18 


002170 


052752 


.UORO 


T19 


002172 


055214 


.UORO 


T20 


002174 


055550 


.UORO 


T21 


002176 


055646 


.UORO 


T22 


002200 


054222 


.UORO 


T25 


002202 


055560 


.UORO 


T24 


002204 


056522 


.WORD 


T25 


002206 


056616 


.UORO 


T26 



•EG 
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11. '2 
1175 
11 '4 
11:5 
1176 
1177 
1178 
117«» 
1180 
llSl 
il»2 
1185 



1184 
1185 
118t> 
1187 
1188 
U89 
1190 
1191 



.SBTTL OErAULT HARDWARE P TABLE 



THE DEFAULT HARDWARE P- TABLE CONTAINS OEFAULT VALUES OF 
THE TEST DEVICE PARAMETERS. THE STRUCTURE OF THIS TABLE 
IS IDENTICAL TO THE STRUCTURE OF THE HARDWARE P TABLES. 
AND IS USED AS A "TEMPLATE" FOR BUILDING THE P- TABLES. 



002210 

002210 000004 

002212 

002212 

002212 160460 
002214 000510 
002216 177777 
002220 005 



BGNHU OFPTBL 



L«HW: : 
OFPTBL 



002222 



.WORD 
.WORD 
.WORD 
.BYTE 
.EVEN 

ENOHU 



160460 
310 
177777 
5 



iDEFAiJLT CSR ADDRESS 

iDEFAULT VECTOR ADDRESS 

iDEFAULT ACTIVE LINES BIT MAP 

» DEFAULT BR LEVEL 



L 10000 
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'.fa 



1^ 

1201 

IJ04 

1205 
1206 
1207 
1208 
1209 
1210 

1211 002222 

002222 000002 

002224 

002224 

1212 

1213 002224 000021 

1214 002226 000000 
1215 

1216 002250 
002230 



.SBTTL SOrrUARE P TABIE 



THE SOFTUARE TABLE CONTAINS VARIOUS DATA USED Br THE 
PROGRAM AS OPERATIONAL PARAMETERS. THESE PARAMETERS ARE 
SET UP AT ASSEMBLY TIME AND MAY BE VARIED Br THE OPERATOR 
AT RUN TIME. 



BGNSU SFPTBL 



OPTION: : 
NDERPT: : 



LfSU: : 
SFPTBL : 



.WORD LlOOOl LfSU/2 



.WORD 
.UORD 



21 
0 



ENOSU 



iBIT MAP OF PROGRAM CONTROL FLAGS 

iDEFAULT NUMBER OF INDIVIDUAL DATA ERRORS TQ RPT 



LlOOOl: 



E3 
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1225 
1226 
1227 
1237 
1236 
1239 
1240 
1241 
1242 
124 S 
1244 
1245 
1246 
1247 
1248 
1249 
1250 
1251 
1252 

1267 002230 



.SBTTL GLOBAL EQUATES SECTION 



000020 
177777 



000O40 
000037 
00OOS6 



TthE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT 
I ARE USED IN MORE THAN ONE TEST, 
t - - 



NUMLNS--20 
MAPLNS- '177777 







* DEVICE REGISTER t 


000004 




LPR0--4 


000006 




FSLS0--6 


000016 




TXBFC0--16 






EQUALS 




i BIT 


OIF INI T IONS 


100000 


BIT15> 


- 100000 


040000 


BIT14. 


• 40000 


020000 


BIT13' 


- 20000 


010000 


BIT12' 


■ 10000 


004000 


6IT11- 


■ 4000 


002000 


BITIO" 


2000 


001000 


BIT09' 


.. 1000 


000400 


BITOA' 


• 400 


000200 


Bl TO f* 


' ■ cOO 


000100 


BIT06' 


.. 100 


000040 


BIT05' 


40 


000020 


BIT04> 


.. 20 


000010 


BIT03' 


10 


000004 


BIT02" 


.. 4 


000002 


BITOl- 


2 


000001 


BITOO- 


1 


001000 


BIT9-' 


■ BIT09 


000400 


BITS-' 


• BIT08 


000200 


BIT7-' 


• BIT07 


000100 


BIT6-' 


• 6IT06 


000040 


BIT5-" 


■ BIT05 


000020 


BIT4.. 


. BIT04 


000010 


BIT3-" 


• BIT03 


000004 


BIT2-' 


■ BIT02 


000002 


BIT1-- 


' BITOl 


000001 


BITO-' 


• BITOO 




J EVENT FLAG DEFINITIONS 



I NUMBER OF LINES ON DHUll IS 16. 
iBIT MAP OF LINES ON DHUll. 

OFFSETS FROM THE CSR'S ADDRESS ••**•• 
jLINE PARAMETER REGISTER OFFSET FROM THE CSR ADDRESS 
iFIFOSIZE/STATUS REGISTER OFFSET FROM THE CSR ADDRESS 
: TRANSMIT COUNT REGISTER OFFSET FROM THE CSR ADDRESS 



EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION 



EF.START-- 32. 
EF. RESTART-- 31. 
EF. CONTINUE-- 30. 



J START COMMAND WAS ISSLtD 
, RESTART COMMAND WAS ISS^€0 
, CONTINUE COMMAND UAS ISSUED 
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GLOBAL FKUATES SECTION 

000035 
000034 



000340 
000300 
000240 
000200 
000140 
000100 
000040 
000000 



000004 
000010 
000020 
000040 
000100 
000200 
000400 
001000 
002000 
004000 
010000 
020000 
040000 
100000 

1268 
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EF.NEW-- 29. 
EF.PUR-- 28. 



S PRIORITY LEVEL DEFINITIONS 



i 



PRI07-- 


340 


PRI06-- 


300 


PRI05-- 


240 


PRI04-" 


200 


PRI05-- 


140 


PRI02" 


100 


PRI01-- 


40 


PRIOO-" 


0 


i OPERATOR FLAG BITS 


EVL-- 


4 


LOT-- 


10 


ADR>- 


20 


IOU-- 


40 


ISR-- 


100 


UAM-- 


200 


BOE-- 


400 


PNT" 


1000 


PRI-- 


2000 


IXE-- 


4000 


IBE-- 


10000 


IER-- 


20000 


LOE-- 


40000 


MOE-- 


100000 



i A NEU PASS HAS BEEN STARTED 
I A POUER FAIL/POWER UP OCCURRED 



1270 
1278 
1279 
1200 
1261 
1282 
1283 
1284 
1285 
1286 
1287 
1288 
1289 
1290 
1291 
1292 
1293 
1294 
1295 
1296 
1297 
1298 
1299 
1300 
1301 
1302 
1303 
1304 
1305 
1306 
1307 
1308 
1309 
1310 
1311 
1312 
1313 
1314 
1315 
1316 
1317 
1318 
1319 
1320 
1321 
1322 
1323 
1324 
1325 
1326 
1327 
1328 
1329 
1330 
1331 
1332 
1333 



002230 
002232 
002234 
002236 
002240 



002242 
002242 
002244 
002246 
002250 

002252 
002254 
002256 
002260 



002262 
002264 
002266 
002270 
002272 
002274 
002276 
002300 



002302 
002304 
002306 
002310 
002312 
002314 



177777 
000300 
000304 
000000 
004 



160020 
160022 
160024 
160026 

160030 
160032 
160034 
160036 



005464 
005470 
005475 
005501 
005517 
005526 
005537 
005550 



000000 
000000 
000000 
000000 
000000 
000000 
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SCO 5? 



.SBTTL GLOBAL DATA SECTION 



i THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 
i IN MORE THAN ONE TEST. 

t - - 



UNIT VARIBLE AREA 



ACTLNS 
RXVECA 
TXVECA 
UNITN: 
BRLEVL 



.WORD 
.WORD 
.WORD 
.UORO 
.BYTE 
.EVEN 



177777 ; ACTIVE LINE BIT MAP. 

300 iRX VECTOR ADDRESS. 

304 jTX VECTOR ADDRESS. 

0 jUNIT Nt^ER. 

4 .INTERRUPT BUS REQUEST LEVEL 



DEVICE REGISTER ADDRESS TABLE 



RXTMA: 
FDATA: 



DRADRT 

CSRA: 

RBUFA 

LPRA: 

FSLSA 

LNCTRA 
TXADIA 
TXAD2A 
TXBFCA 



.WORD 160020 jOHU-11 CSR ADDRESS. 

.WORD 160022 jDHU 11 RECIEVE B'JFFER/TIMER ADDRESS. 

.WORD 160024 ,DHU-ll LINE PARAMETER REGISTER ADDRESS, 

.WORD 160026 iDHU-11 FIFO SIZE/LINE STATUS REGISTER ADDRESS. 
I AND FIFO DATA REGISTER ADDRESS. 

.WORD 160030 jDHU-11 LINE CONTROL REGISTER ADDRESS. 

.WORD 160032 iDHU-11 TRANSMIT BUFFER 1 REGISTER ADDRESS 

.WORD 160034 iDHU-ll TRANSMIT BUFFER 2 REGISTER AOORFSS 

.WORD 160036 jDHU-11 TRANSMIT BUFFER CO^T REGISTER ADDRESS 



REGISTER MESSAGE ADDRESS TABLE 



RMATBB : 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



DROOMG 
DR02MG 
DR04MG 
DR06MG 
DRIOMG 
DR12MG 
DR14MG 
0R16MG 



; ADDRESS OF 
I ADDRESS OF 
s ADDRESS OF 
{ADDRESS OF 
(ADDRESS OF 
; ADDRESS OF 
J ADDRESS OF 
J ADDRESS OF 



"CSR" MESSAGE. 
"RBUF" MESSAGE. 
"LPR" MESSAGE. 
"STAT" MESSAGE. 
"LNCTRL" MESSAGE. 
"TBUFFADl" MESSAGE, 
"TBUFAD2" MESSAGE. 
"TBUFFCT" MESSAGE. 



ASSORTED GLOBAL VARIABLES: 



BUFPTR 
EXOERR 
CTRLCF 
lESTAT 
PASCNT 
RXINTC 



.WORD 0 I STORAGE FOR RECEIVE CHARACTER BUFFER POINTER. 

.WORD 0 r'EXIT ON ERROR" FLAG. 

.WORD 0 J STORAGE FOR THE CONTROL -C FLAG. 

.WORD 0 (STORAGE FOR THE INTERRUPT ENABLE BIT SPATES. 

.WORD 0 iSTO'G FOR PASS COUNT USED IN ROM VERSION TEST, 

.WORD 0 (STORAGE FOR RECEIVER INTERRUPT FLAGS. 
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1534 


002516 


000000 


1335 


002520 


000000 


1536 


002522 


000000 


1357 


002524 


000001 


1556 


002526 


000000 


1559 


002550 


oooooo 


1540 


002352 


OOOOOO 


1541 






1542 






1545 






4 V A ii 

1544 






1545 


002354 


177546 


1546 


002556 


000300 


1547 


002540 


000100 


1540 


002342 


OOOO r4 


1349 


002544 


AAA AAA 

OOOOOO 




002340 


AAAAAA 

OOOOOO 


4 4 

1351 


002350 


AAA 4 7 A 

OOOl /O 


13d2 


002352 


AAA 4 "7 A 

OOOl fO 


1353 


002354 


AAAA*^ 4 
000021 


1354 


002356 


AAAA^O 

OOOOdc 


1355 






135o 






1357 






1356 






1359 


002560 


177572 


1560 


002362 


AAAAAA 

OOOOOO 


1561 


002564 


AAAAAA 

OOOOOO 


1362 


002 3oo 


172540 


1 V£ z 






13o4 












1366 






Lib 7 


0023 r O 


4 T ^£ £ A 

137ooO 


136B 


002572 


177777 


1369 


002574 


A A AAA ^ 

000007 


13 70 


002576 


177777 


13 '1 


O0240O 


• r ^ AC • 

166051 


1 Xl^ 

19 fe 


002402 


OOOOOO 


13 '3 


0024U4 




1 X7A 






1 TT^ 






1 *7<L 






1 177 

lo f f 












1 T70 


AAOA 1 A 


AAA/\A4 




AA^A 1 O 

OOc*» Ic 


OOOOv2 


13<Jl 


AAOil 1 A 

OOc414 


000004 




OA'S A 1 £. 


UOOOlO 


1 TAT 


AAO^ OA 


AAAA'^A 






AAAAAA 




AADA PA 


AAA1 AA 


1586 


002426 


000200 


1387 


002450 


000400 


1388 


002432 


001000 


1389 


002434 


002000 


1390 


002436 


004000 
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RXINTF: : 
TP4FLG: : 
TP4VEC: : 
TSTNUM: : 
TXINTC : : 
TXINTF: : 
UOROl: : 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



0 
0 
0 
1 
0 
0 
0 



J STORAGE FOR RECEIVER INTERRUPT FLAGS. 
jFLAGS SET UMEN AN EXPECTED 004 TRAP OCCURS. 
; STORAGE FOR THE NORMAL 004 TRAP VECTOR, 
, STORAGE FOR THE TEST NUMBER. 
(STORAGE FOR TRANSMIT INTERRUPT COUNT. 
I STORAGE FOR TRANSMIT INTERRUPT FLAGS. 
jLOCATION FOR PASSING INDIRECT PARAMETERS. 



LINE TIME CLOCK VARIABLES AhO STORAGE. 



CLKCSR:: .WORD 177546 jCSR ADDRESS OF THE LTC. 

CLKBRL:; .WORD PRI06 iINTERRUPT PRIORITY LEVEL OF THE LTC. 

CLKVEC:: .WORD 100 iINTERRUPT VECTOR ADDRESS OF THE LTC. 

CLKHRZ:: .WORD 60. jINTERRUPT FREQUENCY OF THE LTC. 

TIMERl:: .WORD 0 iHARDWARE CLOCK COUNTER 41. 

TIMER2:: .WORD 0 t HARDWARE CLOCK COUNTER 42. 

TIMERS:: .WORD 120. i HARDWARE BREAK COUNTER LOCATION. 

BCOUNT:: .WORD 120. iBREAK COUNT VALUE IN CLOCK TICKS. 

MSTICK:: .WORD 17. iNUMBER OF MILLI-SECONOS PER LTC TICK. 

MSLCNT:: .WORD 62 jLOOP COUNT (USED BY MSLOOP) TO DELAY 1 



MS. 



I ************************************************************************ ***«•* 

: HEMMORY MANAGEMENT VARIABLES AND FLAGS. 

I ***************************************************** ************************* 

MMSRO:: .WORD 177572 jADDRESS OF MEM MGT STATUS REGISTER 40. 
MMPRES:: .WORD 0 i MEM MGT PRESENT FLAG (0 IF MM NOT PRESENT). 

MMENAB:: .WORD 0 iMEM MGT ENABLED FLAG (O IF MM NOT ENABLED). 

PAROA:: .WORD 172340 .ADDRESS OF MEM MGT PAR 40. 

I BIT MASK TABLE OF UN-USED DHU DEVICE REGISTER BITS. 



UNBTTB: : .WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



157660 (UNUSED BIT MASK FOR THE CSR 

177777 (UNUSED BIT MASK FOR THE RBUF/RXTIMER REG 

7 (UNUSED BIT MASK FOR THE LPR 

177777 (UNUSED BIT MASK FOR THE STAT/FIFOSIZE/DATA REG 

166051 (UNUSED BIT MASK FOR THE LNCTRL 

0 (UNUSED BIT MASK FOR THE TBUTFAOl 

177774 (UNUSED BIT MASK FOR THE TBUFFAD2 

0 (UNUSED BIT MASK FOR THE TBUFFCT 



TABLE OF WORDS WITH CORRESPONDING BIT SET FOR GENERATION OF BIT MAPS. 



BITTBL: 



.WORD 


1 


iBIT 


0 SET. 


.WORD 


2 


(BIT 


1 SET. 


.WORD 


4 


(BIT 


2 SET. 


.WORD 


10 


(BIT 


5 SET. 


.WORD 


20 


(BIT 


4 SET. 


.WORD 


40 


(BIT 


5 SET. 


.WORD 


100 


(BIT 


6 SET. 


.WORD 


200 


(BIT 


7 SET. 


.WORD 


400 


(BIT 


8 SET. 


.WORD 


1000 


(BIT 


9 SET. 


.WORD 


2000 


(BIT 


10 SET. 


.WORD 


4000 


(BIT 


11 SET. 
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IS91 
1392 
159B 
1594 
1595 
1596 
1597 
1596 
1599 
1400 
1401 
1402 
1405 
1404 
1405 
1406 
1407 
140a 
1409 
1410 
1411 
1412 
1413 
1414 
1415 
1416 
1417 
1416 
1419 
1420 
1421 
1422 
1423 
1424 
1425 
1426 
1427 
1428 
1429 
1430 
1443 



1444 
1445 



002440 
002442 
002444 
002446 



002450 
002450 
002452 
002454 
002456 
002460 



002462 
002464 



002524 
002526 
002726 



002726 
002726 
003326 
003526 
003726 
003726 



003766 
003766 
003766 
003770 
003772 
003774 



010000 
020000 
040000 
100000 



000000 

oooooo 

000000 

oooooo 
oooooo 



oooooo 



oooooo 



oooooo 
oooooo 
oooooo 
oooooo 



. WORD 10000 

.WORD 20000 

.WORD 40000 

.UORD 100000 



iBIT 12 SET. 

iBIT 13 SET. 

iBIT 14 SET. 

tBIT 15 SET. 



GPR SAVE AREA ZERO. 



GPRSOB: 



J* 



BUTBAS 
ERLTBL 
BUFMID 
BUF3QT 
BUFENO 
ENOETB 



ERRTYP 
ERRNBR 
ERRHSG 
ERRBLK 



.WORD 
.UORD 
.WORD 
.WORD 
.WORD 



0 
0 
0 
0 
0 



I BASE OF 
:UORD 1. 
:UORO 
I UORD 
I UORD 4, 
lUORO 5. 



2. 
3. 



GPR SAVE AREA NUMBER ZERO. 

STORAGE FOR Rl . 

STORAGE FOR R2. 

STORAGE FOR R3. 

STORAGE FOR R4. 

STORAGE FOR R5. 



TRANSMISSION AND RECEPTION VARIABLES. POINTERS. AND FLAGS. 



ERSMRF:: .WORD 0 j ERROR SUMMARY REPORT FLAGS. 

ERCNTB:: .BLKU 16. i TABLE OF ERROR COUNTERS. 



STORAGE AREA FOR THE BMP CODE QUEUE. 



BMPCQP 
BMPCQB 
BMPCQE 



.WORD 0 ! POINTER USED TO ACCESS THE NEXT CELL IN QUE. 

.BLKU 64. {STORAGE FQR 32 CELLS. TEST» PLUS BMP CODE. 

I LAST ADDRESS PLUS 2 OF THE BMP CODE QUEUE. 



GENERAL TABLE AND BUFFER AREA- -513 UQROS. 



ERRTBL 







J BASE OF MEMORY BUFFER. 


.BLKU 


128. 


s FIRST HALF OF GENERAL TABLE OR BUFFER. 


.BLKU 


64. 


J SECOND HALF OF GENERAL TABLE OR BUFFER. 


.BLKU 


64. 


J LAST QUARTER OF THE BUFFER AREA. 






lENO OF GENERAL PURPOSE MEMORY BUFFER. 


.BLKU 


16. 


I BUFFER OVERFLOU SPACE. 






L$ERRTBL:: 


.UORD 


0 




.UORD 


0 




.UORD 


0 




.UORD 


0 





.EVEN 



J3 
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144 7 


.SB 


1448 




1449 


• * 


1450 


i * 


1451 


; * 


1452 


; * 


1453 


; « 


1454 


:* 


1455 


t* 


1456 


1* 


1457 


{ * 


1456 


t* 


1459 


; * 


1460 


: * 


1461 


t* 


1462 


:* 


1463 


; « 


1464 




1465 


;* 


1466 


i* 


1467 


; * 


1468 


;* 


1469 


;* 


1470 


;* 


1471 


;* 


1472 


•* 


1473 


;* 


1474 


;* 


1475 


;* 


1476 


;* 


1477 


t* 


1478 


J* 


1479 


I* 


1480 


S* 


1481 




1482 


!* 


1483 


»*• 



.SBTTL GPR HANDLING ROUTINES FOR SUBROUTINE CALLS. 



THERE ARE 4 ROUTINES AND MACRO DEFINITIONS USED FOR THE HANDLING OF 
GPR VALUES DURING SUBROUTINE CALLS WITHIN THIS PROGRAM, THE f-OUR 
ROUTINES/MACRO CALLS HAVE THE FOLLOWING NAMES: 



SAVE 



TO 



MACRO DEFINITION USED AT THE BEGINNING OF A SUBROUTINE 
SAVE THE GPR CONTENTS FOR LATER RESTORATION. 
PASS - MACRO DEFINITION USED AT THE END OF A SUBROUTINE TO RESTORE 
THE PREVIOUSLY SAVED GPR CONTENTS AND TO LEAVE THE CONTENTS 
OF THE SPECIFIED GPRCS) INTACT (NOT RESTORED). 

SISROUTINE WHICH IS CALLED FROM THE SAVE AND PASS MACRO 
EXPANSIONS WHICH ACTUALLY PERFORMS THE ACTIONS ON THE GPRS. 



PREG05 



DURING A SUBROUTINE WHICH USES THESE GPR SAVE ROUTINES THE VALUES 
OF THE GPRS ARE STORED ON THE STACK IN THE FOLLOWING STACK FRAME: 

SP -> RET PC INTO PREG05 ROUTINE. 

SP*2 -> GPR RO CONTENTS. 

SP»4 -> GPR Rl CONTENTS. 

SP»6 -> GPR R2 CONTENTS. 

SP»8 -> GPR R3 CONTENTS. 

SP»10 -> GPR R4 CONTENTS. 

SP»12 -> GPR R5 CONTENTS, 

SP»14 •> RET PC INTO CALLER OF SUB'TNE WHICH CALLED PREG05. 

EACH LEVEL OF SUB'TNE CALLING USES 8 WORDS OF STACK OVERHEAD. 
THE SAVE AND PASS MACROS CAN ALSO BE USED IN "STRAIGHT LINE CODE' 
TO SAVE AND RESTORE THE GPR VALUES. IN Af'Y CASE. AFTER THE 
ISSUING OF A PASS CALL THE GPRS WILL BE RESTORED TO THE VALUES 
THEY HAD PRIOR TO THE LAST SAVE CALL (EXCEPT FOR THE EXCEPTED. 
OR PASSED INTACT. GPRS SPECIFIED AS PARAMETERS TO THE PASS CALL) 
AND THE SP WILL ALSO BE RESTORED TO ITS CONDITION BEFORE THE LAST 
SAVE CALL. THE PROGRAMMER MUST BE SURE THAT THE SP HAS THE SAME 
VALUE WHEN THE PASS MACRO IS CALLED AS IT HAD IMMEDIATELY AFTER 
THE SAVE MACRO WAS CALLED. 



<iEO 35 
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1465 .SBTTL GPR FRAME ACCESS EQUATES 

I486 

1487 lEQUATES THAT ALLOW ACCESS TO THE STACK FRAME. THESE ARE THE 

1488 ;OFFSETS INTO ^hE STACK FOR REGISTERS SAVED DURING THE PREG05 

1489 (ROUTINE. 

1490 ! - 

1492 000036 LPCSLT«- 36 lOFFSET TOR LAST RETURN PC. 

1493 000016 PCSLOT-- 16 jOFFSET FOR RETURN PC. 

1494 000014 R5SL0T-- 14 ; OFFSET FOR R5. 

1495 000012 R4SL0T=» 12 s OFFSET FOR R4. 

1496 000010 R3SL0T=- 10 jOFFSET FOR R3. 

1497 000006 R2SL0T«« 6 jOFFSET FOR R2. 

1498 000004 RISL0T-" 4 jOFFSET FOR Rl. 

1499 000002 ROSLOT-' 2 ; OFF SET FOR RO. 



i_3 
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GLOBAL MACRO DEFINITION SAVE 

1501 .SBTTL GLOBAL MACRO DEFINITION - SAVE 

1502 J***************************** 

1505 !* THIS MACRO IS USED AT THE BEGINNING OF A SUBROUTINE TO SAVE THE 

1504 CONTENTS OF THE GPRS RO THRU R5. 

1505 s ♦ 

1506 :* INPUTS: SP UNCHANGED SINCE SUBROUTINE WAS ENTERED 

1507 J* R5SL0T - OFFSET TO STACK SLOT FOR R5 (EQUATED TO 14 OCTAL) 

1508 !* 

1509 :* OUTPUTS: GPR SAVE AREA ON THE STACK IS LOADED WITH THE CONTENTS OF GPRS 

1510 ;* TOP OF STACK LOADED WITH THE RETURN ADDRESS INTO PREG05 

1511 !* 

1512 s* CALLING SEQUENCE: SAVE 
151S I* 

1514 t* COMMENTS: NO ARGUMENTS ARE ALLOUEO. 

1515 THE PASS MACRO SHOULD BE CALLED TO RESTORE THE GPR VALUES. 

1516 i* 

1517 :* SUBORDINATE ROUTINES CALLED: PREG05. 
1518 

1519 

1520 .MACRO SAVE 

1521 .LIST 

1522 JSR R5.PREG05 iCALL REGISTER SAVE SUBRT. 

1523 .NLIST 

1524 .ENDM SAVE 



PARTI 
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1526 
1527 
15P8 
1529 
1550 
1531 
15S2 
1533 
1534 
1535 
1536 
1557 
1558 
1559 
1540 
1541 
1542 
1543 
1544 
1545 
1546 
1547 
1548 
1549 
1550 
1551 
1552 
1553 
1554 
1555 
1556 
1557 
1558 
1559 
1560 
1561 
1562 
1565 
1564 
1565 
1566 
1567 
1568 
1569 
1570 
1571 
1572 
1573 



,S8TTL GLOBAL MACRO DEFINITION - PASS 

• ***************** *************************** 

;* THIS MACRO IS USED IN CONJUNCTION WITH THE SAVE MACRO. IT IS 

i* CALLED AT END OF A SUBROUTINE TO PASS PARAMETERS IN GPRS BACK TO THE 

!• CALLING ROUTINE BY ALTERING THE GPR SAVE AREA ON THE STACK AND THEN 

i* RETURNING TO PREG05 TO RESTORE THE GPRS TO THEIR SAVED VALUES. 

!* 

S* INPUTS: ONLY ALLOWED ARGUMENTS ARE "RO" THRU "R5". 

ROSLOT THRU R5SL0T MUST BE EQUATED TO THEIR RESPECTIVE GPR SAVE 
SLOT OFFSETS BEFORE CALLING THIS MACRO. 



I* 
I* 

!* 



;* OUTPUTS: 



THE GPR VALUES ARE PUT IN THEIR RESPECTIVE SLOTS ON THE STACK, 



;* 

!* 

:* 
:* 

!* 

:* 

8* 

s* 

8* 
8* 
8* 
J* 
S* 

;* 

8* 
8* 
8* 
8* 
»♦ 
8* 

:* 



CALLING SEQUENCE: 



PASS 



RO.Rl. 



COMMENTS: ANY COMBINATION OF GPR ARGUMENTS MAY BE LISTED IN ANY ORDER. 
FOR EXAMPLE. THE FOLLOWING ARE LEGAL: 

PASS Rl 

PASS R4 RO R2 
THE. GPRS LISTED AS 'ARGUMENTS WILL BE PASSED INTACT TO THE 
CALLING ROUTINE. ALL OTHER GPRS WILL BE RESTORED. 
THE SP MUST BE AT ITS ORIGINAL VALUE WHEN PASS IS CALLED. 

THE MACRO CALL 

PASS RO R3 
EXPANDS INTO THE FOLLOWING ASSEMBLY CODE 

MOV RO.ROSLOTCSP) 

MOV R3.R3SL0T(SP) 

JSR PC.8(SP)» 
IN THIS EXAMPLE GPRS Rl. R2. R4, AND R5 



IN STACK SLOT. 
IN STACK SLOT. 
TO PREG05 SUBRT, 
RESTORED TO 

THEIR VALUES CONTAINED IN THE STACK FRAME AND RO AND R3 
WILL BE LEFT AT THEIR VALUES PRIOR TO THIS PASS CALL. 



PUT RO 
PUT R3 
RETURN 
WILL BE 



SUBORDINATE ROUTINES CALLED: (PREGRT - LABEL WITHIN PREG05. VALUE ON STACK.) 
■ ****************************************************************************** 

.MACRO PASS A.B.C.D.E.F 



IRP 
.IF 
.LIST 

.NLIST 
.ENOC 
.ENDM 
.LIST 



M 1ST 

.ENDM PASS 



X.<A,B.C.D.E.F> 
NB.X 



MOV 



JSR 



X.X'SLOTCSP) 



pc.acsp)* 



sPUT X IN STACK SLOT. 



{RETURN TO PREG05 ScORT 



N5 
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PREG05 



1575 






1576 






1577 






1578 






1579 






1580 






1581 






1582 






1583 






1584 






1585 






1586 






1587 






1588 






1589 






1590 






1591 






1592 






1593 






1594 






1595 






1596 






1597 






1598 






1599 






1600 


003776 




1601 


003776 


010446 


1602 


004000 


010346 


1603 


004002 


010246 


1604 


004004 


010146 


1605 


004006 


010046 


1606 


004010 


010546 


1607 


004012 


016605 000014 


1608 






1609 


004016 


004736 


1610 






1611 






1612 






1613 






1614 






1615 






1616 






1617 






1616 






1619 


004020 


012605 


1620 


004022 


012600 


1621 


004024 


012601 


1622 


004026 


012602 


1623 


004030 


012603 


1624 


004032 


012604 


1625 






1626 


004034 


000205 


1627 







.SeTTL GLOBAL SUBPOUTINE 



PREG05 



PRESERVE REGISTERS RO THROUGH R5 FOR SUBROUTINE CALLS. 



SAVE 



PASS 



!* 

• INPUTS: 

♦ OUTPUTS 
♦CALLING SEQUENCE 

•COMMENTS 
* 

* 

!* 
J* 
I* 
* 

•SUBORDINATE ROUTINES CALLED: 



THE RETURN ADDRESS BACK INTO THE CALLING ROUTINE MUST BE IN 
GPR R5. (I.E. MACROS USE "JSR R5,PREG05".l 

REGISTERS RO THROUGH R5 ARE SAVED ON THE STACK. 



(SUBROUTINE CODE). 



i MACRO EXPANSION CALLS PREG05. 



: MACRO EXPANSION RECALLS PREG05. 



THIS ROUTINE IS RE-ENTRANT. 

PARAMETERS MAY BE PASSED OUT OF A SUBROUTINE Br MODIFYING THE 
REGISTER SAVE AREA ON THE STACK. USE THE PASS GPRN MACRO 
TO RETURN GPR VALUES INTACT. 

USE THE RNSLOT OFFSETS FROM THE SP TO PASS OTHER PARAMETERS. 
[EXAMPLE: MOV VALUE .ROSLOTC SP ) 1 

MAKE SURE THE SP IS AT ITS ORIGINAL VALUE WHEN YOU DO THIS. 

NONE. 



PREG05: 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 

JSR 



R4.-(SP) 
R3. -(SP) 
R2.-(SP) 
Rl.-(SP) 
RO.-(SP) 
R5.-(SP) 
R5SL0T(SP).R5 

PC,a(SP)* 



;R5 HAS BEEN LOADED ON THE STACK BY THE SUBROUTINE CALL 



SAVE R4 
SAVE R3 
SAVE R2 
SAVE Rl 
SAVE RO 

PUSH RETURN PC ON TOP OF STACK 
RESTORE R5 TO VALUE IT HAD BEFORE CALLS 

CALL THE SUBROUTINE AT THE RETURN ADDRESS 
FROM THE PREG05 CALL. PUTTING THE PRESENT 
PC ON THE STACK AS A RETURN ADDRESS INTO 
THIS (PREG05) ROUTINE. 

I THE FOLLOWING CODE IS EXECUTED WHEN THE CALLING ROUTINE DOES A 

I "RETURN" [JSR PC.a(SP)»l USING THE PC DEPOSITED ON THE STACK ABOVE. 

: — 



PREGRT:: MOV 
MOV 
MOV 
MOV 
MOV 
MOV 

RTS 



(SPV.R5 
(SP)*,RO 
(SP)».R1 
(SP)*,R2 
(SP)*.R3 
(SP)».R4 

RS 



{PUT RETURN PC IN R5. 
(RESTORE RO. 
iRESTORE Rl. 
t RESTORE R2. 
(RESTORE R3. 
(RESTORE R4. 

(RETURN TO THE SUBROUTINE WHICH CALLED PREG05, 
(RESTORING RS IN THE PROCESS. 



CZOMUBO OMU 11 ^UNC TbT PMTl 
GLOBAL TFXT SECTION 



16S7 
it>$6 
1639 
1640 
1641 
164^ 
164 5 
1644 
1645 
1646 
164' 

1648 004056 
004056 
004056 
004041 
004044 
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1649 

1655 
1656 
1657 

1658 004046 
004046 



1659 
1660 
166 



104 

055 
000 



110 
061 
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.SBTTL GLOBAL TEXT SECTION 



125 
061 



THE GLOBAL TEXT SECTION CONTAINS FORHAT STATEMENTS. 
rCSSAGES. AND ASCII INFORMATION TMAT ARE USED IN 
MORE THAN ONE TEST. 



NAMES Of DEVICES SUPPORTED Bt PROGRAM 
DEVTtP <OHU ll> 



'.ECi 4C 



004046 


104 


110 


125 


004051 


055 


061 


061 


004054 


04C 


106 


125 


004057 


116 


105 


040 


004062 


124 


125 


124 


004065 


040 


120 


101 


004070 


122 


124 


061 


004075 


000 







LiDvTfP: : 



.ASCIZ /DMU 11/ 



.EVEN 



I TEST DESCRIPTION 
* OESCRIPT 



<0MO 11 TUNC TST PART1> 



LIDESC:: 



.ASCIZ /OMiJ-ll ruHC TST PAR 



.EVEN 



.Even 



C4 
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16 76 
1677 

1676 
16 7<» 
1660 
1661 
1662 
1663 
1664 
1665 
1666 
1667 
1666 
1669 
1690 
1691 
1692 
169? 
1694 
1695 
1696 
1697 
1696 
1699 
1700 
1701 



.NLIST BIN 



004074 
004101 
004154 
004256 
004S1S 
004 S45 
004407 
004451 
004546 
004615 
004664 
004710 
004777 
005074 
005150 
0052S0 
005255 
0053 SS 
0054SS 



eF0503 
Er0505 
EF1401 
Eri402 
EF1601 
Eri602 
EF1603 
Eri604 
EF3001 
EFS002 
EF9006 
EF9010 
EF9016 
EF9017 
EF9016 

EF9301 
EF9302 
HFUNIT 



FORMAT STATEMENTS USED IN PRINT CALLS 



PROG 2 • «02«A(0)«N/ 



4/ 



•ASCIZ /«T«N/ 

.ASCIZ /«A «05itA ILLEGAL INTERRUPTS RECFIVE0.#N/ 
.ASCI7 /<N*A ROM VERSION NUMBERS: PROC.l • *D2«A(D) 
.ASCIZ /«TtfA ROM VERSION NUMBFR «T«N/ 
.ASCIZ /«A «T«A. TEST ABORTED %H/ 
.ASCIZ /*A EXPECTED DATA; «06*A (0).«N/ 
.ASCIZ /«A ACTUAL DATA: tf06«A (0).«N/ 

.ASCIZ /«A BAD BITCS) IN DEVICE. «T«A REGISTER FOR LINE •02<A CD). 
.ASCIZ /«A EXPECTED OR CORRECT VALUE: i»03*N/ 
.ASCIZ /«A ACTUAL OP MEASURED VALUE: «05«N/ 
.ASCIZ /«A «T«A «02«Arr>)«N/ 

•ASCIZ /*A NUMBER OF ERRORS DETECTED ON LINE *D2*A IS «D5«N/ 
.ASCIZ /*A UNEXPECTED *T«A FOR LINE *D2«A(0) IN FIFO AFTER REbET:«N/ 
.ASCIZ /«A «TtfA CUITH ERROR FLAGS) IS «06«AC0)«N/ 
.ASCII /*A «T#A IN SELFTEST CODE FIFO SLOT FOR LINE #02/ 
.ASCIZ /#A(D) AFTER RESET. «N/ 

.A^CIZ /«A tfT«02«A(D). BMP CODE REPORTED :«03«A(0)«N/ 

.ASCIZ /*A OVERFLOW OCCURRED CMORE TMAN 31 BMP CODES FOUND IN QUEUE )*N/ 
.ASCIZ /«NtfA TESTING UNIT :«D4«N/ 
.EVEN 

.LIST BIN 



D4 
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'.EO 4? 



I '10 
I'll 
171^ 

ins 

1714 
1715 
1716 
1717 
1718 
1719 
1720 
1721 
1722 
1725 
1724 
1725 
1726 
1727 
1728 
1729 
1750 
1751 
1752 
1755 
1754 
1755 
175€ 
1757 
1758 
1759 
1740 
1741 
1742 
1745 
1744 
1745 
1746 
1747 
1748 
1749 
1750 
1751 
1752 
1755 
1754 
1755 
1756 
1757 
1758 
1759 
1760 
1761 
1762 
1765 
1764 
1765 
1766 



.NLIST BIN 



GLOBAL ERROR MESSAGES 



00^464 
005470 
005475 
005501 
005517 
005526 
005557 
005550 
005560 
005616 
005651 
005755 
006024 
006114 
006167 
006255 
006546 
006420 
006505 
006560 
006642 
006757 
007015 
007077 
007165 
007241 
007522 
007415 
007505 
007575 
007657 
007727 
010017 
OlOlll 
010202 
010245 
010555 
010425 
010517 
010610 
010656 
010726 
010766 
011022 
011055 
011142 
011220 
011275 
011521 
011405 
011465 



DROOnC: 
DR02MC: 
0R04MG:: 
0R06MG: 
ORIOMG: 
0R12MG: : 
ORMMG: 
DR16MG: : 
EM0105: ; 
EM0201 : 1 
Eri0202: 1 

En0205: : 

Eri0204: : 

EM0501: ; 
EM0502: ; 

EM0505: ; 

En040L: : 
En0402:i 

EM0501 : ; 
Eri0502: ; 

EM0525: : 
EM0526: : 
Eri0601:! 
En0602: ; 

En0605; : 

Eri0701: : 
EM0702: : 

EM0705: ; 

EM0801 
EM0802 
EM0901 
EM0902 
EMIOOI 
Eni002 
EH1005 
EMllOl 
EM 1201 
EM1202 
EM1205 
EM1204 



.ASCIZ /CSR/ 
.ASCIZ /RBUF/ 
.ASCIZ /LPR/ 
.ASCIZ /FIFOSIZE.STAT/ 
.ASCIZ /LNCTRL/ 
.ASCIZ /TBUFFADl/ 
.ASCIZ /TBUFrAD2/ 
.ASCIZ /TBUFFCT/ 

.ASCIZ /DEVICE REGISTER ACCESS ERRORS/ 
.ASCIZ / MASTER RESET TEST FAILED./ 

.ASCIZ / MASTER RESET BIT DID NOT CLEAR AFTER BOARD RESET./ 

.ASCIZ / WAITED 5 SECONDS. BIT DEFECTIVE OR FIRMWARE HUNG./ 

.ASCIZ / MASTER RESET BIT CLEAR IMMEDIATELY AFTER BOARD RESET./ 

.ASCIZ / BIT DEFECTIVE OR BOARD FIRMWARE ERROR./ 

.ASCIZ \ MR BIT WENT CLEAR WITHIN 1/2 SECOND OF BOARD RESET. \ 

.ASCIZ / BIT DEFECTIVE OR SELFTEST WAS (INCORRECTLY) SKIPPED./ 

.ASCIZ /MASTER RESET (SKIP SELFTEST) TEST FAILED./ 

.ASCIZ / MR BIT CLR WITHIN 10 MILISECOND AFTER BOARD RESET./ 

.ASCIZ / BIT DEFECTIVE OR BOARD FIRMWARE ERROR./ 

.ASCIZ \ MR BIT WENT CLEAR 1/5 TO 5 SECONDS AFTER RESET. \ 

.ASCIZ / SELFTEST DID NOT GET SKIPPED (SHOULD HAVE BEEN SKIPPED)./ 

.ASCIZ /RBUF REGISTER RX CHARACTER FIELD TEST FAILED.' 

.ASCIZ / IMPROPER CODE FOUND IN RX FIFO AFTER DUT RESET./ 

.ASCIZ / EXPECTED: SELFTEST CODE. ACTUAL: IMPROPER CODE./ 

.ASCIZ /RBUF REGISTER ERROR FLAGS FIELD TEST FAILED/ 

.ASCIZ / RX ERROR FLAC(S) FOUND CLEAR ON SELFTEST CODE./ 

.ASCIZ / EXPECTED: ALL ERROR FLAGS SET, ACTUAL: FLAG{S) CLEAR,/ 

.ASCIZ / RX INTERRUPT S) RECEIVED WITH RX INTERRUPTS DISABLED./ 

.ASCIZ / TX INTERRUPT(S) RECEIVED WITH TX INTERRUPTS DISABLED./ 

.ASCIZ /CSR RX, DATA. AVAIL BIT TEST FAILED/ 

.ASCIZ / RX, DATA, AVAIL BIT FOUND CLEAR AFTER RESET COMPLETION,/ 
.ASCIZ / EXPECTED BIT TO BE SET FROM SELFTEST CODES IN FIFO,/ 
.ASCIZ / RX, DATA. AVAIL BIT COULD NOT BE CLEARED BY PURGING FIFO./ 
.ASCIZ / 600 CHARS READ FROM FIFO WITHOUT R.D,A BIT CLEARING,/ 
.ASCIZ /RBUF RX, DATA. VALID BIT TEST FAILED/ 

.ASCIZ / RX. DATA, VALID BIT FOUND CLEAR AFTER RESET COMPLETION./ 
.ASCIZ / EXPECTED BIT TO BE SET FROM SELFTEST COOES IN FIFO./ 
.ASCIZ / RX. DATA. VALID BIT CCXJLD NOT BE CLEARED BY PURGING FIFO./ 
.ASCIZ / 600 CHARS READ FROM FIFO WITHOUT R.D.V BIT CLEARING./ 
.ASCIZ /RBUF RX. LINE. NUMBER FIELD TEST FAILED/ 
.ASCIZ / LINE NUMBER WRONG ON A SELFTEST CODE./ 
.ASCIZ /CHECK FOR BMP.COOES TEST FAILED/ 
.ASCIZ /UNEXPECTED BMP COOES FOUND./ 
.ASCIZ /SKIP SELF -TEST TEST FAILED/ 

.ASCIZ / SKIP SELF -TEST TOOK TOO LONG TO COMPLETE, > 50 MS./ 
.ASCIZ / SKIP SELF -TEST COMPLETED TOO SOON, < 10 MS./ 
, ASCIZ /DIAGNOSTIC FAIL (SKP SELFTEST) TEST FAILED/ 
.ASCIZ /SELF -TEST TEST FAILED/ 

.ASCIZ / SELF -TEST TOOK TOO LONG TO COMPLETE, > 5 SECONDS. 
.ASCIZ \ SELF -TEST COMPLETED TOO SOON. < 1/2 SECOND. \ 
.ASCIZ / SELF -TEST DID NOT EXECUTE/ 





PARTI 


1767 


011517 






! .ASCIZ 


1768 


011543 






. .ASCIZ 


1769 011576 






! .ASCIZ 


1770 


011635 






.ASCIZ 


1771 


011674 


CHI An? 




.ASCIZ 


1772 


011762 






.ASCIZ 


1775 


012035 


CMI AAA 




.ASCIZ 


1774 


012107 






.ASCIZ 


1775 


012122 


CMI AfV« 




.ASCIZ 


1776 


012135 






.ASCIZ 


1777 


012147 


PHI AOlK 




.ASCIZ 


1778 


012155 






.ASCIZ 


1779 


012203 


CHI ^n? 

crix JVC 




.ASCIZ 


1780 


012221 






.ASCIZ 


1781 


012304 


FH1<>04 




.ASCIZ 


1762 


012360 


FM1 7ni 




.ASCIZ 


1783 


012443 






.ASCIZ 


1784 


012517 






.ASCIZ 


1785 


012602 


b>iCWX 




.ASCIZ 


1786 


012652 


CiCvwc 




.ASCIZ 


1787 


012725 


EHP301 




.ASCIZ 


1788 


012772 


wric JVC 




.ASCIZ 


1789 


015030 


EHP401 




.ASCIZ 


1790 


013073 


cncvvx 




.ASCIZ 


1791 


013131 


CMP&A3 




.ASCIZ 


1792 


013222 


WIICQV J • 




.ASCIZ 


1793 


013310 


tricvV^ 




.ASCIZ 


1794 


013404 


cncov J 




.ASCIZ 


1795 


013467 


CICVVV 




.ASCIZ 


1796 


013526 


FM9l^n7 
cncov r 




.ASCIZ 


1797 


013622 


FM94«mi 

cncwvo 




.ASCIZ 


1798 


013673 


FMSAfiQ 




.ASCIZ 


1799 


013752 


FM9I«1 O 
cncDXv 




.ASCIZ 


1800 


014044 


FM9A1 1 




.ASCIZ 


1801 


014127 


FM?A1 7 
cricoxc ■ 




.ASCIZ 


1802 


014223 


FHX/VI1 




.ASCIZ 


1803 


014262 


en jVVc 




.ASCIZ 


1804 


014356 






.ASCIZ 


1805 


014432 






.ASCIZ 


1806 


014506 






.ASCIZ 


1807 


014600 


Eri3101 




.ASCIZ 


1808 


014643 


EMS 102 




.ASCIZ 


1809 


014722 


EM9014 




.ASCIZ 


1810 


015016 


Ert9017 




.ASCII 


1611 


015073 




.ASCIZ 


1812 


015127 


EM9018 




.ASCIZ 


1813 


015137 


EM9019 




.ASCIZ 


1814 


015154 


EM9020 




.ASCIZ 


1815 


015200 


EM9022 




.ASCIZ 


1816 


015217 


EH9023 




.ASCIZ 


1817 


015241 


EM9024 




.ASCIZ 


1818 


015257 


EM9301 




.ASCIZ 


1819 


015336 


EM9302 




.ASCIZ 


1820 


015366 


Ef19303 




.ASCIZ 


1821 


015435 


Ef19304 




.ASCIZ 


1822 






.EVEN 


1823 
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/ DIAG FAIL BIT BAD/ 

/FAIL SELF -TEST TEST FAILED/ 

/ SELF -TEST ERROR REPORTING BAD/ 

/ROM VERSION NUMBER TEST FAILED/ 

/ 
/ 
/ 
/ 
/ 



<;E0 43 



FIFO EMPTY. ONE OR MORE ROM VERSION NUMBERS MISSING/ 
ROM VERSION .NUMBER FOUND OUT OF SEQUENCE/ 
ONE OR MORE ROM VERSION .NUMBERS MISSING/ 
PROC.l/ 
PROC 2/ 
/NOT FOUND/ 
/FOUND/ 

/CSR BIT 4 TEST FAILED/ 
/CSR BIT 4 BAD/ 

/TIMEOUT OCCURRED WAITING FOR MASTER RESET TO CLEAR/ 

\OEVICE REGISTER WORD REAO/URITE TEST FAILE0\ 

\DEVICE REGISTER WORD READ/MOOIFY/WRITE TEST FAILED\ 

\DEVICE REGISTER BYTE READ/URITE TEST FAILE0\ 

\0EVICE REGISTER BYTE READ/MOOIFY/MRITE TEST FAILEOS 

/DEVICE STAT REGISTER ID BIT TEST FAILED/ 

/ID BIT BAD. EXPECTED: SET. ACTUAL: CLEAR./ 

/TX.ENA8LE (INACTIVE) BIT TEST FAILED/ 

/ TX ENABLE BIT BAD HN LINE: / 

/TX ENABLE (ACTIVE) BIT TEST FAILED/ 

/RECEIVE INTERRUPT TEST FAILED/ 

/ NO RX INT GENERATED (DATA.VALIO SET. RX INTS ENABLED)./ 
/ NO RX INT GENERATED (NO COOES IN FIFO AFTER RESET)./ 
/ NO RX INT GENERATED (RX.DATA.AVAIL CLR. RX INTS ENABLED)./ 
/ RX INTERRUPT GENERATED WITH RX.DATA.AVAIL CLEAR./ 
/TRANSMIT INTERRUPT TEST ERROR:/ 

/ TX ACTION SET REPEATEDLY AFTER BOARD R'cSET. NO DATA SENT./ 

/ TX ACTION STUCK SET AFTER BOARD RESET./ 

/ TX INTERRUPT GENERATED WITH TX.ACTION CLEAR./ 

/ NO TX INTERRUPT WITH TX.ACTION SET AND TX INTS ENABLED./ 

/ TX.ACTION NOT SET AFTER CHARS SENT ON ALL LINES./ 

/ NO RX INT GENERATED (RX.DATA.AVAIL SET, RX INTS ENABLED)./ 

/INTERRUPT BR LEVEL TEST FAILED/ 

/ NO RX.DATA.AVAIL FROM SELFTEST COOES IN FIFO AFTER RESET./ 

/ TX INTERRUPT GENERATED AT WRONG BR LEVEL:/ 

/ RX INTERRUPT GENERATED AT WRONG BR LEVEL:/ 

/ TX INTERRUPT GIVEN PRECEDENCE OVER SIMULTANEOUS RX INT./ 

/DIAGNOSTIC FIELD (BMP) TEST FAILED/ 

/ DIAGNOSTIC FIELD (BMP REQUEST) BAD ON LINE: / 

/SUMMARY REPORTS FOR LINES WITH EXCESSIVE NUMBERS OF ERRORS:/ 

/ FIFO WILL NOT PURGE (DATA.VALIO STUCK SET)./ 

/ REMAINDER OF TEST SKIPPED./ 

/NO CODE/ 

/NON- SELF TEST/ 

/SELFTEST ERROR CODE/ 

/DATA CHARACTER/ 

/MODEM STATUS CODE/ 

/SELFTEST CODE/ 

/BMP COOES WERE REPORTED DURING THIS DIAGNOSTIC/ 
/BMP CODE FOUND IN TEST / 
/THE LAST BMP CODE WAS FOUND IN TEST / 
/UNEXPECTED BMP COOES FOUND DURING THIS PASS/ 

.LIST BIN 



\ 4 
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163^ 
1833 

1934 .SBTTL GLOBAL ERROR REPORT SECTION 
1635 

1636 i * * 

1657 I THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS 

1856 I USED BY MORE THAN ONE TEST TO OUTPUT ADDITIONAL ERROR INFORMATION. PRINTS 

183«» } (BASIC) ANO PRINTX (EXTENDED) CALLS ARE USED TO CALL PRINT SERVICES. 

1640 t ■ • 



C^BtM^O OHU 11 FONT TST PARTI 
GLOeAL tRROR REPORTING ROUTINE 
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EROlOl 



G4 
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1842 

1843 

1844 

1845 

1846 

184 7 

1848 

1849 

1850 

1851 

1852 

1853 

1854 

1855 

1856 

1857 

1658 

1859 

1860 

1661 

1662 

1663 

1864 

1665 015510 
015510 

1666 015510 
015510 

1867 

1868 015514 

1869 015520 

1870 015524 
1871 

1872 
1873 
1874 

1675 015526 

1876 015532 

1877 015534 
015534 
015540 
015544 
015546 
015550 

1878 015554 
1679 015560 

1880 015562 
015562 
015566 
015572 
015574 
015576 

1881 015602 
015602 
015606 
015612 
015614 
015616 



004567 166262 



012700 
046700 
001036 



032705 
001410 

012746 
012746 
010600 
104414 
062706 
032705 
001410 

012746 
012746 
010600 
104414 
062706 

012746 
012746 
010600 
104415 
062706 



000100 
164500 



000001 



015626 
000001 



000004 
000002 



015704 
000001 



000004 

015763 
000001 



000004 



SBTTL GLOBAL ERROR REPORTING ROUTINE EROJOl 



THIS IS AN ERROR REPORTING Sl^ROUTINE WHICH PRINTS ADDITIONAL ERROR 

ERROR IS DETECTED IN TEST I (REGISTER AOOREbS 
ACCESS TEST). IF THE "EXTENDED ERROR INFO" OPTION HAS BEEN SELECTED 
THEN THIS Sl«ROUTINE WILL REPORT THE TYPE OF ACCESS (READ OR WRITE OR 
BOTH) WHICH CAUSED A BUS TIME-OUT TRAP (004 TRAP). A MESSAGE INDICATING 
THAT THE DHU MAY BE AT THE WRONG UNIBUS ADDRESS IS ALSO PRINTED 



♦ INPUTS: 



* OUTPUTS: 



R5 - ERROR FLAG WORD. 

IF BIT 0 IS SET. 
IF BIT 1 IS SET. 



A READ ERROR OCCUREO. 
A WRITE ERROR OCCURED. 



MESSAGES ARE PRINTED AT THE OPERATOR CONSOLE. 



CALLING SEQUENCE: 



INCLUDE THE LABEL "EROlOl" AS THE MESSAGE POINTER 
PARAMETER IN THE DRS ERROR REPORT MACRO CALL 



♦ COMMENTS: 



* SL«ORDINATE ROUTINES USED: NONE, 



BGNMSG EROlOl 
SAVE 



MOV 
BIC 
BNE 



; ♦ 



EROlOl: : 

J SAVE THE GPR CONTENTS. 
JSR R5.PREG05 jCALL REGISTER SAVE SUBPT. 

•eiT06.R0 iSET-l^ THE BIT MAP FOR 'REPORT EXT'D ERROR INFO 

OPTION. RO I TRY AND CLEAR THE FLAG. 

6» »EXIT IF OPTION NOT SELECTED. 



I REPORT EXTENDED ERROR INFOMATION 



2»: 



4*: 



BIT ffeiTO.RS 
BEQ 2% 
PRINTB «MSG1 



BIT «BIT1.R5 
BEQ 4* 
PRINTB •MSG2 



PRINTX •MSG3 



I TEST FOR READ ERROR. 

I SKIP READ ERROR MSG IF NO READ ERROR, 
s PRINT READ ERROR MESSAGE. 

MOV 
MOV 
MOV 
TRAP 
ADO 

I TEST FOR WRITE ERROR. 

iSKIP WRITE ERROR MSG IF NO WRITE ERROR 
iPRINT WRITE ERROR MESSAGE. 

MOV 
MOV 
MOV 
TRAP 
ADO 

I SUGGEST THAT OHU MAY BE AT WRONG ADDRESS 

MOV ♦MSG3.-(SP1 
MOV ♦l.-(SP) 
MOV SP.RO 
TRAP C«PNTX 
ADD »4 . SP 



•MSGl. -(SP) 
»1. (S?) 
SP.RO 
C»PNTB 
•4.SP 



•MSG2. -(SP) 

•l.-(SP) 

SP.RO 

CtPNTB 

•4.SP 



MACRO M12 



1682 015622 
015622 
1083 015624 
015624 



004756 



I88S 
1889 



6$: 



HAR 84 09:15 

PASS 
ENDHSG 
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PAGE 39 1 
JSR 



•■'eo 4*, 



jRESTORE THE GPR CONTENTS 
PC.8CSP)* 





104423 






1 AAA 










045 


101 


102 


A1 


125 


123 


040 






4 4 4 

111 


115 


UlSOd 1 


105 


055 


117 






124 


040 






122 


101 






040 


103 


A1 QJLCV 


101 


125 


123 




103 


104 


040 


A 1 A 1 


1 AO 

lUc 


131 


Ail A 

040 




lee 


1 AC 

105 


4 A 4 

101 


n 1 C4: A 7 
UIOOO f 


1 AA 
lU* 


Ail A 


4 /\ 4 

101 




1 OA 


1 Oil 

124 


4 AC 

105 




lie 

113 


1 OA 

120 


4 Oil 

124 


Ol S700 




AAC 


4 4 £ 

116 


Ol S70T 


AAA 




lMf% 01S704 




1 A1 
lOl 


4 A^ 

102 


01^707 


1 OC 

le3 


1 Ol 

le2 


Ail A 

040 


Ol ^71 3 
wXO f Ic 


lei 


III 

111 


4 4 C 

115 


Ol S71 ^ 

vX J f Xj 


1 AC 

1U3 


ACC 

055 


4 4^ 

117 


01^730 
VX3 r c\/ 


1 oc 
le3 


1 OA 

lei 


Ail A 

040 


Ol •»73X 
VX J r 


lei 


1 oo 
lee 


4 A4 

101 


Ol ^73<l 
wX J f cO 


t OA 

leO 


Ail A 

040 


103 


Ol ^7T1 


4 A « 

101 


125 


123 


0 1 ^ 7 XA 


1 AC 


4 Ail 

104 


040 


Ol •i7T7 


1 AO 

lOe 


4 V 4 

131 


040 


01S7A3 


1 07 

le f 


122 


111 


VX J f J 


1 OA 

lei 


1 AC 
105 


Ail A 

040 


01S7S0 


1 A1 

lUl 


124 


124 


Ol ^7^X 


1 AC 
1U3 


1 4 C 

115 


120 


01S7^^ 

V X ^ r JO 


1 OA 

lei 


056 


A^ E 

045 


0157#il 


1 1 

ilo 


AAA 

ooo 


1887 015765 




1 Al 

lui 


4 Ail 

104 


015766 


1 1 A 

1 11/ 


1 oc 
le5 


Ail A 

040 


015771 

w x^ r r X 


lie 

11 J 


1 A1 

lOl 


4 V « 

13x 


015774 


OAA 


1 AO 


105 


015777 


AAA 


1 A 1 

101 


124 




OAO 


1 OA 

lei 


4 4 A 

110 


016005 


1 oe 

1U3 


AAA 

mo 


127 


016010 


1 

xee 


117 

11 ' 


116 


016013 


107 


040 


125 


016016 


116 


111 


102 


016021 


125 


123 


040 


016024 


101 


104 


104 


016027 


122 


105 


123 


016032 


123 


056 


045 


016035 


116 


045 


116 


016040 


000 





.RETURN TO PREG05 SUBRT, 
L 10002; 



TRMP 



C»MSG 



.ASCIZ /«ABUS TIME OUT TRAP CAUSED Bt READ ATTEMPT. «N/ 



.ASCIZ /«ABUS TIME-OUT TRAP CAUSED Br URITE ATTEMPT. «N/ 



.ASCIZ /*A0HU MAY BE AT THE WRONG UNIBUS ADDRESS. «*»N/ 



.EVEN 



CZOHUBO DHU-11 FUNC TST PARTI 
GLOBAL ERROR REPORTING ROUTINE 



1691 
1892 
1895 
1894 
1895 
1896 
1897 
1898 
1899 
1900 
1901 
1902 
1905 
1904 
1905 
1906 
1907 
1906 
1909 
1910 
1911 
1912 
1915 
1914 
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1915 

1916 
1917 
1918 
1919 
1920 
1921 
1922 
1923 
1924 
1925 



1926 



1927 
1926 

1929 
1950 



016042 
016042 
016042 
016042 

016046 
016052 
016056 

016060 
016062 
016064 

016066 
016066 
016070 
016074 
016100 
016102 
016104 
016110 
016110 
016112 
016116 
016122 
016124 
016126 

016152 
016152 

016134 
016154 
016154 



004567 165750 



012700 
046700 
001025 

010102 
105722 
001576 



010146 
012746 
012746 
010600 
104414 
062706 

010246 
012746 
012746 
010600 
104414 
062706 



004756 



104425 



000100 
164146 



004074 
000002 



000006 



004074 
000002 



000006 



.SBTTL GLOBAL ERROR REPORTING ROUTINE 



ER0201 



* 
* 

I* 

* 
* 

* 
* 

* 

* 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS 2 CONTIGUOUS 
ASCII ERROR MESSAGES. THE ADDRESS OP THE PIRST MESSAGE IS PASSED 
AS AN INPUT PARAMETER AND THE ADDRESS OF THE SECOND IS rOUNO 8^ 
SEARCHING FOR THE END OF THE FIRST MESSAGE. THE MESSAGES ARE ONL f 
PRINTED IF EXT'O ERROR REPORTING HAS BEEN REQUESTED. 

INPUTS: Rl ADDRESS OF THE FIRST MESSAGE TO PRINT. 

OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 



CALLING SEQUENCE: 



LOAD THE ADDRESS OF THE FIRST MESSAGE IN Rl. 
INCLUDE THE LABEL ••ER0201" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 



COMMENTS: THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 

THE SECOND MESSAGE SHOULD FOLLOW THE FIRST ONE IN THE PROGRAM 
MEMORY. EACH MESSAGE SHOULD BE DEFINED USING .ASCI7 

SUBORDINATE ROUTINES USED: NONE. 



2»: 



BGNMSG 
SAVE 



MOV 
BIC 
BNE 

MOV 
TSTB 
BNE 



ER0201 



JSR 



«6IT06.R0 
OPTION. RO 
4t 

R1.R2 
(R2)» 
2t 



ER0201: : 

J SAVE THE GPR CONTENTS. 

R5.PREG05 iCALL REGISTER SAVE SUBRT. 

;TRY TO CLEAR THE 

tEXT'D ERROR REPORTING FLAG 

jEXIT IF FLAG NOT SET. 



J CHECK FOR A ZERO BYTE (EW OF MESSAGE). 
(LOOP UNTIL NEXT MESSAGE IS FOUND. 



PRINTS •EF0S05.R1 



I PRINT THE FIRST MESSAGE. 



PRINTB «EF0505.R2 



jPRINT THE SECOND MESSAGE. 



MOV 


Rl. CSP^ 




MOV 


•EFO505. 


(SP) 


MOV 


•2. (SP) 




MOV 


SP.RO 




TRAP 


CIPNTB 




ADD 


•6.SP 




MOV 


R2. (SP) 




MOV 


♦EF0505. 


-(SP) 


MOV 


•2.-(SP) 




MOV 


SP.RO 




TRAP 


C»PNTB 




ADO 


•6.SP 





4»: 



PASS 
ENOMSG 



JSR 



jRESTORE THE GPR CONTENTS. 



PC.8(SP)» 



(RETURN TO PREG05 SlBRT. 



L 10005: 



TRAP 



CfNSG 



CZ0HU8O OMU 11 ruNC TST PART I 
GLOBAL ERROR REPORTING ROUTINE 



1952 
1953 
1934 
1955 
1956 
1937 
1958 
1959 
1940 
1941 
1942 
1943 
1944 
1945 
1946 
1947 
1948 
1949 
1950 
1951 



1952 
1953 
1954 
1955 
1956 
1957 
1956 



1959 
1960 



016136 
016136 

016136 
016142 
016146 



016150 
016150 
016152 
016156 
016162 
016164 
016166 

016172 
016172 
016172 



J 4 
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012700 000100 
046700 164056 
001011 



010146 

012746 004074 
012746 000002 
010600 
104414 

062706 000006 



104425 



ER0503 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS AN ADDITIONAL ERROR 
MESSAGE WHOSE ADDRESS IS PASSED AS AN INPUT PARAMETER. PROVIDED 
EXTENDED ERROR REPORTING HAS BEEN REQUESTED. 



Rl ADDRESS OF THE MESSAGE TO PRINT. 

A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 



!♦ 

I* INPUTS: 
J* 

» OUTPUTS: 
* 

* CALLING SEQUENCE: LOAD THE ADDRESS Of THE MESSAGE IN Rl. 

* INCLUDE THE LABEL "ER05O3' AS THE MESSAGE POINTER 

* PARA^ETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 

!♦ COMMENTS: THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 
* 

* SUBORDINATE ROUTINES USED: NONE. 

****************************************************************************** 



BGNMSG ER0503 



ER0503: 



MOV 
BIC 
BNE 



«6IT06,R0 
OPTION. RO 
2* 



PRINTB ♦EF0503.R1 



J TRY TO CLEAR THE 

:EXT'D ERROR REPORTING FLAG 

J EXIT IF FLAG NOT SET. 



: PR INT THE MESSAGE. 



2$: 



ENOMSG 



L10004: 



MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 



TRAP 



SEO 49 



Rl.-(SP) 
)3. 
♦2. (SP) 
SP.RO 
CIPNTB 
•6.SP 



C»MSG 



ROUTINE 
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•EO 4'* 



1962 
1963 
1964 
1965 
1966 
1967 
1966 
1969 
1970 
1971 
1972 
1973 
1974 
1975 
1976 
1977 



.SBTTL GLOBAL ERROR REPORTING ROUTINE 



ER0504 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ADDITIONAL ERROR 
MESSAGES WHEN ILLEGAL INTERRUPTS ARE RECEIVED. 



Rl 
R2 



* INPUTS: 

* OUTPUTS: 
U CALLING SEQUENCE: 

* 

* COMMENTS: 



ADDRESS or THE MESSAGE TO PRINT. 
NUMBER OF ILLEGAL INTERRUPTS RECEIVED. 



MESSAGESS ARE PRINTcD AT THE OPERATOR CONSOLE. 

LOAD THE ADDRESS OF THE HESSAGE IN Rl. 
LOAD THE NUMBER OF ILLEGAL INTS IN R2. 
INCLUDE THE LABEL "ER0504" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 



1979 








{• SLwOKDINATt 


HUUIINcb UbcD: 


NUNC . 




1980 
















1981 
















1982 


016174 
016174 






BGNTISu 




ER0504: : 




1983 


















A1 ^1 7A 


vie f\J\J 








•TRY TO n FAR THF 




1985 


016200 


046700 


164020 


BIG 


OPTION. RO 


:EXT-0 ERROR REPORTING FLAG 




1986 


016204 


001022 




BNE 


2< 


sEXIT IF FLAG NOT SET. 




1987 
















1988 


016206 
016206 


010146 




PRINTB 


#EF0503.R1 


jPRINT THE FIRST LINE OF THE MESSAGE. 

MOV 


Rl.-(SP) 




016210 


012746 


004074 






MOV 


♦EF0505. 




016214 


012746 


000002 






MOV 


•2.-(SP) 




016220 


010600 








MOV 


SP.RO 




016222 


104414 








TRAP 


CtPNTB 




016224 


062706 


000006 






AOO 


•6,SP 


1989 


016230 
016230 


010246 




PRINTX 


«EF0505.R2 


tPRINT THE NUMBER OF INTS RECEIVED. 

MOV 


R2. -(SP) 




016232 


012746 


004101 






MOV 


•EF0505. 




016236 


012746 


000002 






MOV 


92. CSP) 




016242 


010600 








MOV 


SP.RO 




016244 


104415 








TRAP 


C»PNTX 




016246 


062706 


000006 






ADD 


•6.SP 


1990 
















1991 


016252 
016252 
016252 


104423 




2»: ENOMSG 




L 10005: 

TRAP 


CIMSG 



(SP) 



CZ0MU80 OHU II fUNC TST PARTI 
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1995 
1994 
1995 
1996 
1997 
1998 
1999 
2000 
2001 
2002 
2005 
2004 
2005 
2006 
2007 
2008 
2009 
2010 
2011 
2012 
2015 
2014 
2015 
2016 
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'-E0 50 



2017 
2018 
2019 
2020 
2021 
2022 



2023 
2024 
2025 
2026 
2027 
2028 
2029 
2030 
2031 
2032 
2033 
2034 
2035 
2036 
2037 
2038 
2039 
2040 
2041 
2042 



016254 
016254 

016254 
016260 
016264 

016266 
016266 
016270 
016274 
016300 
016302 
016304 



016310 
016314 
016320 
016324 
016326 
016330 
016334 

016340 
016344 
016350 
016352 
016354 
016360 
016364 



012700 
046700 
001053 



010146 
012746 
012746 
010600 
104414 
062706 



012705 
012701 
012702 
120305 
001402 
012702 
004767 

012701 
012702 
120405 
001402 
012702 
004767 
000413 



000100 
165740 



004074 
000002 



000006 



000145 
012107 
012135 



012147 
000026 

012122 
012135 



012147 
000002 



.SBTTL GLOBAL ERROR REPORTING ROUTINE 



ER1401 



• 



* 

!* 
* 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ADDITIONAL ERROR 
INFORMATION CIF REQUESTED DURING THE SOFTWARE QUESTIONS) IF AN ERROR 
IS DETECTED IN THE ROM VERSION TEST. THIS SUBROUTINE ANALYSES THE INPUT 
PARAMETERS WHICH CONTAIN THE ROM VERSION NUMBERS FOR PROC 1 AND PROC 2 
AND REPORTS THE APPROPRIATE ERROR MESSAGF TO THE OPERATOR? 



INPUTS: 



* OUTPUTS: 
J* 



Rl CONTAINS THE ADDRESS OF THE FIRST MESSAGE TO BC REPORTED. 
R3 - CONTAINS THE ROM VERSION NUMBER OF PROC 1. 
R4 CONTAINS THE ROM VERSION NUMBER OF PROC .2. 

BASIC AND EXTENDED ERROR MESSAGES ARE REPORTED AT THE 
OPERATORS CONSOLE. 



CALLING SEQUENCE: 



COMMENTS: 



INCLUDE THE LABEL "ER1401' AS THE MESSAGE POINTER 
PARAMETER IN THE DRS ERROR REPORT MACRO CALL. 



* SUBORDINATE ROUTINES USED: NONE. 



BGNMSG ER1401 



MOV 
BIC 
BNE 



#BIT06.R0 
OPTION. RO 
60t 



PRINTB «EF0505.R1 



ER1401:: 

J TRY TO CLEAR THE 

lEXT'D ERROR REPORTING FLAG 

lEXIT IF FLAG NOT SET. 

I REPORT THE ERROR MESSAGE PASSED IN. 

MOV 

MOV 

MOV 

MOV 

TRAP 

AOO 



Rl.-(SP) 

*EF0503. 

•2.-CSP) 

SP.RO 

CIPNTB 

•6.SP 



(SP) 



t DETERMINE WHICH ROM VERSION NUMBERCS) ARE MISSING, 
t - 



2$: 



4»: 



MOV 


♦99. .R5 


iGET INVALID ROM NUMBER. 


MOV 


•EM1405.RI 


J SELECT PROC.l MESSAGE. 


MOV 


#€M1407,R2 


J SELECT THE "NOT FOUND- MESSAGE. 


CMPB 


R3.R5 


i CHECK PROC.l ROM VERSION NUMBER. 


BED 


2» 


iGO REPORT PROC.l CODE NOT FOUND. 


MOV 


«EM1408.R2 


I SELECT "FOUM)" MESSAGE. 


JSR 


PC. 50$ 


iGO REPORT MESSAGE. 


MOV 


♦eM1406,Rl 


» SELECT PR0C_2 MESSAGE. 


MOV 


#EM1407.R2 


J SELECT THE "NOT FOUND" MESSAGE. 


CMPB 


R4.R5 


! CHECK PROC .2 ROM VERSION NUMBER. 


BEQ 


4$ 


;G0 REPORT PROC .2 CODE NOT FOUND. 


MOV 


OEM 1408. R2 


: SELECT "FOUND" MESSAGE. 


JSR 


PC.50* 


iGO REPORT THE MESSAGE. 


BR 


60 ( 


•EXIT. 



L E 



M4 



^E0 SI 



2043 

2044 016366 
016366 
016370 
016372 
016376 
016402 
016404 
016406 

2045 016412 

2046 016414 
016414 
016414 



010246 
010146 

012746 004256 
012746 000003 
010600 
104415 

062706 000010 
000207 



104423 



50»! 



PRINTX •Eri402.Rl.R2 ;REPORT THE MESSAGE, 



60$ i 



RTS PC 
ENOnSG 



: RE TURN. 



MOV R?. (SP) 

MOV Rl. fSPJ 

MOV ♦Eri402. (SP) 

MOV »5. CSP) 

MOV SP.RO 

TRAP CIPNTX 

ADO 010. SP 



L 10006: 



TRAP CIMSG 



N4 



CZQMUBO DMU 11 fUNC TST PARTI 
GL08AI ERROR REPORTING f 



ROUTINE 
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«;E0 'i? 



2048 
2049 
2050 
2051 
2052 
2053 
2054 
2055 
2056 
2057 
2058 
2059 
2060 
2061 
2062 
2063 
2064 
2065 
2066 
2067 
2068 
2069 
2070 
2071 

2072 
2073 
2074 
2075 
2076 
2077 
2078 
2079 
2080 



016416 
016416 

016416 
016422 
016426 



2061 



2082 



2063 



016434 
016434 
016436 
016440 
016444 
016450 
016452 
016454 
016460 
016460 
016462 
016466 
016472 
016474 
016476 
016502 
016502 
016504 
016510 
016514 
016516 
016520 
016524 
016524 



C 12 700 
046700 
001036 



010546 
010446 
012746 
012746 
010600 
104414 
062706 

010246 
012746 
012746 
010600 
104415 
062706 

010146 
012746 
012746 
010600 
104415 
062706 



S8TTL GLOBAL ERROR REPORTING ROUTINE ER1601 

********************************* **«******************«******«4i**«**«*******« 

THIS AN ERROR REPORTING SUBROUTINE WHICH PRINTS ADDITIONAL ERROR 
INFORMATION IF AN ERROR IS DETECTED IN ONE OF THE DEVICE REGISTER 
ACCESS TESTS. PROVIDED EXTENDED ERROR REPORTING HAS BEEN REQUESTED. 
THIS SUBROUTINE REPORTS THE ACTUAL AND EXPECTED FROM THE DEVICE 
REGISTER(S) WHICH ISC ARE) IN FAULTY. 



INPUTS: 



OUTPUTS: 



Rl - ACTUAL DATA (UNUSED BITS SET TO 0). 

R2 - EXPECTED DATA (UNUSED BITS SET TO 0). 

R3 OFFSET (IN BYTES) TO THE REGISTER BEING TESTED. 

R5 LINE NUMBER OF REGISTER BEING TESTED. 

RMATBB - LABEL AT BASE OF REGISTER MESSAGE ADDRESS TABLE. 

MESSAGES ARE PRINTED AT THE OPERATORS CONSOLE. 



CALLING SEQUENCE: 



COMMENTS: 



INCLUDE THE LABLE "ER1601" AS THE MESSAGE POINTER 
PARAMETER IN THE ORS ERROR REPORT MACRO CALL. 



SUBORDINATE ROUTINES CALLED: NONE 
***************************************************************************** 

BGNMSG ER1601 

ER1601: : 



000100 
163576 



016430 016304 002262 



MOV «6 I T06.ro 
BIC OPTION, RO 
BNE 2» 



MOV RMATBB(R3),R4 
PRINTS «EF1604,R4,R5 



;TRY TO CLEAR THE 

sEXT'D ERROR REPORTING FLAG 

;EXIT IF FLAG NOT SET. 



•.FETCH ADDRESS OF REGISTER NAME MESSAGE. 
! REPORT BASIC MESSAGE (REG NAME AND LINE «). 



004451 
000003 



000010 



004345 
000002 



000006 



004407 
000002 



000006 



PRINTX «eF1602.R2 



{PRINT THE EXPECTED DATA. 



PRINTX »EF1603.R1 



J PRINT THE ACTUAL DATA. 



MOV 


R5. (SP) 




MOV 


R4.-(SP) 




MOV 


•EF1604. 


(SP) 


MOV 


»3. (SP) 




MOV 


SP.RO 




TRAP 


C$PNTB 




ADO 


«10.SP 




MOV 


R2. -CSP) 




MOV 


0EF1602. 


(SP) 


MOV 


♦2.-(SP) 




MOV 


SP.RO 




TRAP 


C»PNTX 




ADO 


♦6.SP 




MOV 


Rl. (SP) 




MOV 


«EF1603, 


(SP) 


MOV 


9^, (SP) 




MOV 


SP.RO 




TRAP 


CtPNTX 




ADO 


«6.SP 





2$! 



ENOMSG 



L 10007: 



C/OH(.MO DHI.) It HfNC TST PARTI MACRO mZOO IS NAR 114 09: IS PAGE 44 1 rjfQ e> 

LlOBAi ^fiHOR Rt PORTING ROUTINE ER1601 



0lfcV4 1044^5 



TRAP CtHSb 



C/DMUBO OHl< U KiNC TbT PARTI 
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^065 
^006 
^Ofl- 
^068 
2089 
2090 
2091 
2092 
2093 
2094 
2095 
2096 
2097 
2C98 
2099 
2100 
2101 
2102 
2103 
2104 
2105 
2106 
2107 
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2108 

2109 
2110 
2U1 
2112 
2113 
2114 
2115 



2116 
2117 
2118 



2119 
2120 

2121 



016526 
016526 
016526 
016526 

016532 
016SS6 
0!6542 



016544 
016544 
016546 
016552 
016556 
016560 
016562 

016566 
016572 
016572 
016574 
016600 
016604 
016606 
016610 

016614 
016614 
016616 
016616 
016616 



004567 165244 



012700 
046700 
001024 



010146 
012746 
012746 
010600 
104414 
062706 

016702 

010246 
012746 
012746 
010600 
104414 
062706 



004736 



104423 



000100 
163462 



004074 

000002 



000006 
165200 



004313 

000002 



000006 



SBTTL GLOBAL ERROR REPORTING ROUTINE 



ER1605 



THIS ERROR REPORTING ROUTINE IS USED TO PRINT OUT A BASIC ERROR 
MESSAGE, ALONG WITH A MESSAGE INFORMING THE OPERATOR MMICM TEST IS 
ABOUT TC BE ABORTED. PROVIDED EXTENDED ERROR INTOMATION HAS BEEN 
REQUESTED. OTHERWISE ONLY A "TEST FAILURE" MESSAGE UILL BE PRINTED. 



INPUTS: 



OUTPUTS: 



Rl CONTAINS THE ADDRESS OF THE MESSAGE TO BE PRINTED. 
ERRMSG - CONTAINS THE ADDRESS OF THE MESSAGE THAT INDICATE 
THE TEST THAT IS BEING PERFORMED. CG DMA. BREAK ETC. 

MESSAGES ARE PRINTED AT THE OPERATORS CONSOLE. 
"TESTNAME TEST ABORTED" 



CALLING SEQUENCE: 



COMMENTS; 



INCLUDE THE LABLE "ER1603' AS THE MESSAGE POINTER 
PARAMETER IN THE DRS ERROR REPORT MACRO CALL. 



SUBORDINATE ROUTINES CALLED: NONE. 



BGNMSG ER1603 



SAVE 



MOV 
BIC 
BNE 



JSR 



•BIT06,R0 
OPT ION. RO 
2* 



PRINTB •EF0505.R1 



ER1603: : 
tSAVE THE CONTENTS OF THE GPRS. 
R5.PREG05 iCALL REGISTER SAVE SUBRT. 

I TRY TO CLEAR THE 

lEXT'D ERROR REPORTING FlAG 

lEXIT IF FLAG NOT SET, 



iPRINT BASIC MESSAGE ON OPERATORS CONSOLE. 



MOV ERRMSG. R2 
PRINTS •EF1601.R2 



iGET THE "TEST MESSAGE' . 
iPRINT "TEST ABORTED" MESSAGE. 



MOV Rl. CSP) 

MOV •EF0503. -CSP) 

MOV •2.-CSP: 

MOV SP.RO 

TRAP CtPNTB 

ADD «6.SP 



MOV R2.-(SP) 

MOV •EF1601. (SPI 

MOV •2,-(SP) 

MOV SP.RO 

TRAP CtPNTB 

ADO ce.SP 



21: 



PASS 
ENOMSG 



•RESTORE THE CONTENTS 0* THE GPRS. 
JSR PC.BCbP)* 



IRETURN TO PREG05 SU8»T, 
LlOOlO: 



TR4P 



CIMSG 



2126 
2127 
212a 
2129 
2150 
2131 
2152 
2153 
2154 
2135 
2156 
2137 
2156 
2139 
2140 
2141 
2142 
2143 
2144 
2145 

2146 
2147 
2140 
2149 

2150 
2151 



.SBTTL GLOBAL ERROR REPORTING ROUTINE 



ER5001 



2152 



2155 



2154 
2155 



THIS IS AN ERROR REPORTING SUBRO'JTINE WHICH IS INTENDED FOR USE IN THE 
INTERRUPT BR LEVEL TEST. IT REPORTS ADDITIONAL INFORMATION WHEN AN 
INTERRUPT HAS OCCURRED AT THE WRONG BR LEVEL. UNLESS EXTENDED ERROR 
REPORTING HAS BEEN REQUESTED. ONLY THE TEST FAIL MESSAGE 
BE PRINTED. 

INPUTS: Rl ADDRESS OF MESSAGE TO PRINT FIRST. 

R4 - BR LEVEL AT WHICH THE INT REQUEST OCCURRED. 
R5 EXPECTED OR CORRECT BR LEVEL FOR THE OUT. 

OUTPUTS: A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 

CALLING SEQUENCE: 



* COMMeNTSi 



INCLUDE THE LABEL "ER3001" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 

THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 









i* SUBORDINATE 


ROUTINES USED: 


NONE. 








016620 






BGNMSG 


ER3001 










016620 










ER3001:- 








016620 


012700 


000100 


MOV 


«6IT06.R0 


;TRy to clear the 








016624 


046700 


163374 


BIC 


OPTION. RO 


lEXT'O ERROR REPORTING FLAG 








016650 


001033 




BNE 


21 


iEXIT if FLAG NOT SET. 








016632 






PRINTB 


•EF0503.RI 


;PRINT THE FIRST LINE OF THE MESSAGE. 






016632 


010146 










MOV 


Rl. -(SP) 




0166S4 


012746 


004074 








MOV 


•EF0503. 


ISP) 


016640 


012746 


000002 








MOV 


♦2. -CSP) 




016644 


010600 










MOV 


SP.RO 




016646 


104414 










TRAP 


C»PNTB 




016650 


062706 


000006 








AOO 


•6.SP 




016654 






PRINT X 


•EF3001.R5 


jREPORT EXPECTED BR LEVEL. 








016654 


010546 










MOV 


R5. (SP) 




016656 


012746 


004546 








MOV 


•6F3001. 


-(SP"> 


016662 


012746 


000002 








MOV 


42. (SP) 




016666 


010600 










MOV 


SP.RO 




016670 


104415 










TRAP 


C«PNTX 




016672 


062706 


000006 








ADD 


•6.SP 




016676 






PRINTX 


4EF3002.R4 


iREPORT ACTUAL BR LEVEL. 








016676 


010446 








MOV 


R4. (SP) 




016700 


012746 


004615 








MOV 


•6F3002. 


(SP) 


016704 


012746 


000002 








MOV 


•2. (SP) 




016710 


010600 










MOV 


SP.RO 




016712 


104415 










TRAP 


C»PNTx 




016714 


062706 


000006 








AOO 


•6.SP 




016720 






21 : ENOMSG 












016720 










L 1001 I: 








016720 


104423 










TRAP 


CIMSG 





b 



-J 



CrOHUBO DHU 11 fUNC TbT PARTI 
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^l57 
2150 
2159 
2160 
2161 
2162 
2163 
2164 
2165 
2166 
2167 
2160 
2169 
2170 
2171 
2172 
2173 
2174 
2175 
2176 
2177 
2170 
2179 
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2100 
2101 
2102 
210S 



2104 
2105 
2106 
2107 
2108 
2109 
2190 



2191 
2192 
2193 
2194 

2195 



016722 
016722 
016722 
016726 
016732 
016734 
016734 
016740 
016744 
016750 
016752 
016754 
016760 
016762 
016766 
016770 
016772 
016774 
016776 
016776 
017002 
017004 
017010 
017014 
017016 
017020 
017024 
017026 
017030 
017032 
017034 
017034 
017034 



012700 
046700 
001040 

012746 
012746 
012746 
010600 
104414 
062706 
005002 
016703 
005004 
000241 
006003 
103013 

016446 
010246 
012746 
012746 
010600 
104415 
062706 
012405 
005202 
005703 
001356 



104425 



000100 
163272 



014722 
004074 
000002 



000006 
163474 



002464 

004710 
000003 



000010 



SBTTL GLOBAL ERROR REPORTING ROUTINE 



ER9004 



J* 
s» 
!• 
»♦ 

«• 
;* 
t* 

t* 
s* 
• • 

:• 
s* 

:♦ 



THIS IS AN ERROR REPORTING SUBROUTINE WHICH REPORTS ERROR SUMMARIES 
FOR LINES WHICH HAVE EXCEEDED THE SPECIFIED MAXIMUM NUMBER OF 
INDIVIDUAL RECEPTION ERRORS. PROVIDED EXTENDED ERROR REPORTING HAS 
BEEN REQUESTED BY THE OPERATOR. 

INPUTS: Rl - ADDRESS OF MESSAGE TO PRINT FIRST. 

ERCNTB - LABEL AT BASE OF LINE ERROR COUNTERS TABLE. 
ERSMRF "REPORT ERROR SUMMARY FOR LINE" FLAGS. 

OUTPUTS: A MESSAf* IS PRINTED AT THE OPERATOR CONSOLE, 



INCLUDE THE LABEL "ER9004" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 

^HE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR II^^ORMATION. 
THE CONTENTS OF GPRS R2. R3. R4. AND R5 ARE DESTROYED. 



CALLING SEQUENCE: 
COMMENTS: 
SUBORDINATE ROUTINES USED: NONE 



BOtlSG ER9004 



MOV 
BIC 
BNE 

PRINTB 



21 1 



CLR 

MOV 

CLR 

CLC 

ROR 
BCC 
PRINTX 



•En9014.(SP) 

♦EF0503.-CSP) 

•2.-CSP) 

SP.RO 

CIPNTB 

«6.SP 



4$: 



61: 



MOV 
INC 
TST 
BNE 

ENOMSG 



ER9004: : 

«6IT06.R0 iTRY TO CLEAR THE 

OPTION. RO lEXT'D ERROR REPORTING FLAG 

61 jEXiT IF FLAG NOT SET. 

«EF0503.«EM9014 {REPORT THE SECONDARY ERROR MESSAGE. 

MOV 

MOV 

MOV 

MOV 

TRAP 

AGO 

R2 (CLEAR THE LINE COUNTER. 

ERSMRF. R3 iGET THE ERROR SUMMARY FLAGS. 

R4 iCLEAR "LINE COUNTER TIMES 2" OFFSET. 

I CLEAR THE CARRY FQR THE FOLLOWING ROTATE. 
R3 (SHIFT ANOTHER ERROR SUMMARY FLAG INTO CARRY. 

4« I SKIP PRINTING MESSAGE IF FLAG FOR LINE CLEAR. 

•eF9010 , R2 . ERCNT8( R4 ) 

MOV ERCNTB(R4'>.-(SP"> 

MOV R2.-(SP) 

MOV •EF9010. -CSPt 

MOV n. (SP) 

MOV SP.RO 

TRAP CIPNTX 

ADD 910. SP 

(R4)».R5 (INCREMENT THE LINE OfFSET BY 2. 

R2 (INCREMT THE LINE COUNTER. 

R3 (CHECK THE ERROR SUMMARY FLAGS. 

2$ (IF MORE FLAGS SET. LOOP TO DO OTHER LINES. 



L10012: 



TRAP 



C»MSG 



£197 
2196 
2199 
2200 
2201 
2202 
220S 
2204 
2205 
2206 
2207 
2208 
2209 
2210 
2211 
22l'c 
2215 
2214 
2215 
2216 
2217 
2218 
2?19 

2220 
2221 

2221 
222A 
2225 
2226 



2227 



2226 
2229 



017036 
017036 

017036 
017042 
017046 

017050 
017054 
017054 
017056 
017060 
017064 
017070 
017072 
017074 
017100 
017100 
017102 
017104 
017110 
017114 
017116 
017120 

017124 
017124 
017124 



012700 
046700 
001026 



000100 
163156 



042703 177760 



010346 
010146 
012746 
012746 
010600 
104414 
062706 

010246 
010146 
012746 
012746 
010600 
104415 
062706 



104423 



005150 
000003 



000010 



005074 
000003 



000010 



?0 M12' 



%9ia7 



-J 
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S8TTL GLOBAL ERROR REPORTING ROUTINE 



ER9007 



• THIS IS AN ERROR REPORTING SUBROUTINE WHICH IS USED TO REPORT THAT 

• SOMETHING OTHER THAN A SELFTEST CODE WAS FOUND IN A SELF TEST CODE 

• FIFO SLOT DURING THE REMOVAL OF THE SELFTEST CODES FROM THE FIFO, 

• THIS ROUTINE IS USED BY THE RSTRPT ROUTINE, EXTENDED ERROR INFOMATION 
« IS GIVEN ONLY WHEN REQUESTED IN THE SOFTWARE QUESTIONS. 



♦ INPUTS: Rl - ADDRESS OF ERROR MESSAGE QUALIFIER STRING, 

• R2 - INCORRECT CODE AS READ FROM THE SELFTEST CODE FIFO SLOT, 

* R3 - LINE NUMBER ASSOCIATED WITH THE SELFTEST FIFO SLOT. 
* 

* OUTPUTS: A MESSAGE IS PRINTED AT THE OPERATOR CONSOLE. 



* CALLING SEQUENCE: 



INCLUDE THE LABEL "ER9007" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 



» COMMENTS: 



THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 



* SUBORDINATE ROUTINES USED: NONE. 



BGNMSG ER9007 



MOV 
BIC 
BNE 

BIC 
PRINTB 



«6IT06.R0 
OPTION. RO 
2* 

•177760. R3 
•EF9018.R1.R3 



PRINTX •EF9017.RI,R2 



ER9007: : 

J TRY TO CLEAR THE 

tEXT'D ERROR REPORTING FLAG 

jEXIT IF FLAG NOT SET. 

» REMOVE ALL BUT LINE » BITS FROM LINE 
(REPORT SECONDARY ERROR MESSAGE. 

MOV 

MOV 

MOV 

MOV 

MOV 

TRAP 

AOO 

;REPORT THE ACTUAL INCORRECT CODE. 

MOV 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 



« WORD. 

R3. (SPl 

Rl, (SP) 

•EF9018. (SP) 

*3.-(SPl 

SP.RO 

C»PNTB 

♦10. SP 

R2,-(SP) 
Rl. -(SP) 
♦EF'JOl"'. -(SP) 
•3. -(SP> 
SP.RO 
CIPNTX 
•10. SP 



2»: ENOMSG 



L10013: 

TRAP 



C»MSG 
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2«?S1 
2^52 
2255 
2254 
2255 
2256 
2257 
2250 
2259 
2240 
2241 
2242 
2245 
2244 
2245 
2246 
2247 
2240 
2249 
2250 
2251 

2252 
2255 
2254 
2255 
2256 
2257 
2250 
2259 
2260 
2261 
2262 
2263 
2264 



2265 



2266 
2267 



017126 
017126 

017126 
017152 
017136 



017140 
017142 
017144 
017150 
017150 
017152 
017154 
017160 
017164 
017166 
017170 
017174 
017174 
017176 
017200 
017204 
017210 
017212 
017214 

017220 
017220 
017220 



012700 OOOIUO 
046700 165066 
001050 



010203 
000303 
042703 

010346 
010146 
012746 
012746 
010600 
104414 
062706 

010246 
010146 
012746 
012746 
010600 
104415 
062706 



104423 



177760 



004777 
000003 



000010 



005074 
000003 



000010 



.SBTTL GLOBAL ERROR REPORTING ROUTINE 



ER9008 



!• 
!• 

J* 
t* 
;* 
;* 
t* 

I* 

8* 

«• 
I* 
;* 
* 
* 



THIS IS AN ERROR REPORTING SUBROUTINE UHICH IS USED TO REPORT THAT 
AN UNEXPECTED CODE OR CHARACTER HAS BEEN FOLftO IN THE DUT RECEIVE 
CHARACTER FIFO. THE ADDITIONAL ERROR IS REPORTED ONLY IF REQUESTED 
DURING THE SOFTWARE QUESTIONS. 

INPUTS: Rl ADDRESS OF PARTIAL ERROR MESSAGE STRING. 

R2 INCORRECT CODE AS READ FROM THE SELFTEST CODE FIFO SLOT. 

OUTPUTS: A MESSAGE IS PRINTED AT THE OPERATOR CONSOLE. 

CALLING SEQUENCE: INCLUDE THE LABEL "ER9006" AS THE MESSAGE POINTER 

PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 

COMMENTS: THE MESSAGE IS PRINTED AS BASIC AND EXTENDED ERROR INFORMATION. 

SUBORDINATE ROUTINES USED: NONE. 



BGNMSG ER9008 



ER9008: 



MOV 
SIC 
BNE 



«BIT06.R0 
OPTION. RO 
2$ 



sTRY TO CLEAR THE 

iEXT'D ERROR REPORTING FLAG 

lEXIT IF FLAG NOT SET. 



EXTRACT THE LINE NUMBER FROM THE INCORRECT CODE OR CHARACTER WHICH WAS READ 
FROM THE SELFTEST CODE FIFO SLOT. 



MOV R2.R3 

SUAB R3 

BIC •177760. RS 

PRINTB 0EF9016.R1.R5 



PRINTX •EF9017,R1.R2 



{CALCULATE LINE NUMBER OF CODE. 
{REPORT TYPE OF INCORRECT CODE FOUND. 

rx)v 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADD 

•REPORT THE ACTUAL INCORRECT CODE. 

MOV 

MOV 

MOV 

MOV 

MOV 

TRAP 

ADO 



R3.-(SP) 
Rl.-CSP^ 
0EF9016. -(SP) 
♦5. (SP) 
SP.RO 
C»PNTB 
♦10. SP 



21: 



ENOMSG 



L 10014: 



TRAP 



R2. (SP) 
Rl. -(SP) 
♦£F9017. 
♦5. (SP) 
SP.RO 
CSPNTX 
•10. SP 



C»MSG 



(SP) 



CJOMOBO DHU U fUNC TbT PARTI 
GLOBAl ERROR REPORTING ROUTINE 



2269 
2270 
2271 
2272 
2275 
2274 
2275 
2276 
2277 
2270 
2279 
2260 
2261 
2262 
2263 
2264 
2265 
2266 
2267 
2266 



H5 
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^£0 '/i 



2269 
2290 
2291 
2292 
2293 
2294 
2295 



2296 
2297 



017222 
017222 

017222 
017226 
017232 



017234 
017254 
017236 
017240 
017244 
017250 
017252 
017254 

017260 
017260 
017260 



012700 
046700 
001012 



010146 
010246 
012746 
012746 
010600 
104414 
062706 



104423 



000100 
162772 



004664 
000003 



000010 



ER9101 



THIS IS A GENERAL ERROR REPORTING SUBROUTINE WHICH REPORTS A MESSAGE 
WHICH TAKES A -SINGLE, 2 DIGIT DECIMAL ARGUMENT AFTER THE END OT AN 
ASCII MESSAGE. 



Rl 

H2 



VALUE TO BE PRINTED AFTER MSG AS ? DECIMAL DIGITS. 
ADDRESS OF MESSAGE TO PRINT FIRST. 



* 

• INPUTS: 
* 

♦ OUTPUTS: 

* CALLING SEQUENCE 

t COMMENTS: THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION 
* 

♦ SUBORDINATE ROUTINES USED: NONE. 



A MESSAGES IS PRINTED AT THE OPERATOR CONSOLE. 

INCLUDE THE LABEL "ER9101" AS THE MESSAGE POINTER 
PARAMETER IN THE OIAG SUPER ERROR REPORT MACRO CALL. 



BGNMSG ER9101 



MOV ♦6IT06.ro 
BIC OPT ION. RO 
BNE 2$ 



ER9101: : 



iTRy TO CLEAR THE 

iEXT'D ERROR REPORTING FLAG 

;EXIT IF FLAG NOT SET. 



PRINTB ♦EF9006.R2.R1 jREPORT THE STRING FOLLOWED BT THE NUMBER. 



2$: 



ENDMSG 



L10015: 



MOV 
MOV 
MOV 
MOV 
MOV 
TRAP 
ADO 



TRAP 



Rl. CSP) 
R2. -CSP) 
♦EF9006. 
♦3. -CSP) 
SP.RO 
CtPNTB 
♦10. SP 



C»MSG 



(SPl 



CZOHUBO OHU 11 fUNC TbT PARTI 
GLOBAL ERROR REPORTING ROUTINE 

2500 
2301 
2302 
2303 
2304 
2305 
2306 
230 ■' 
2308 
230<» 
2510 
2311 
2312 
2313 
2514 
2315 
2316 
2317 
2318 
2319 

2320 017262 
017262 
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<iEO Vj 



2321 


017262 








017262 


004567 


164510 


2522 








252o 


0I72OO 


Oltf 700 


OOOlOO 


292^ 


017272 


04o 70U 


162 f e6 


2920 


017276 


001064 












2327 


017500 
017500 


010146 






017502 


012746 


004074 




017506 


012746 


000002 




017312 


010600 






017314 


104414 






017516 


062706 


000006 


2528 


017522 


012705 


002526 


2329 


017526 


012705 


015336 


2330 


017552 


012501 




2351 


017554 


012504 




2332 


017556 


004767 


C00056 


2355 


017542 


020502 




2334 


017544 


105772 




2535 








2556 








2357 








2556 








2559 








2540 








2341 


017546 


020227 


002722 


2542 


017552 


001056 




2545 


017554 


005762 


000002 


2544 


017560 


001455 




2545 


017562 


012501 




2546 


017564 


011504 




2547 


017566 


012705 


015366 



ER9501 



THIS IS AN ERROR REPORTIK'G SUBROUTINE WHICH PRINTS ANY BMP CODES 
THAT ARE FOUND IN THE BMP CODE QUEUE. TOGETHER WITH THE THE NUMBER OF 
THE TEST THAT WAS EXECUTING AT THE TIME THE BMP CODE WAS LOGGED. 
PROVIDED EXTENDED ERROR REPORTING HAS BEEN ENABLED. 



Rl 
R2 



INPUTS: 

t* 
I* 

J* OUTPUTS: 
* 

* CALLING SEQUENCE 

J I COMMENTS: 

• SUBORDINATE ROUTINES USED 



THE ADDRESS OF THE FIRST MESSAGE TO BE REPORTED. 
THE ADDRESS OF THE NEXT EMPTY CELL IN THE QUEUE. 



THE TEST NUMBER FOLLOWED BY THE BMP CODE ARE PRINTED AT THE 
OPERATOR CONSOLE. 

INCLUDE THE LABEL "ER9301" AS THE MESSAGE POINTER 
PARAMETER IN THE DIAG SUPER ERROR REPORT MACRO CALL. 

THE MESSAGE IS PRINTED AS BASIC ERROR INFORMATION. 

NONE. 



BGNMSG ER9301 



SAVE 



MOV 
BIC 
BNE 



JSR 



•BIT06.ro 

option.ro 

60t 



PRINTS ♦EF0503.RI 



2t: 



MOV 
MOV 
MOV 
MOV 

JSR 
CMP 

BLO 



•BMPCQ6.R5 

#EM9502.R5 

(R5)».Rl 

(R3)».R4 

PC. 50$ 

R5.R2 

2i 



ER9501: : 
;SAVE THE GPRS ON THE STACK. 
R5,PREG05 ;CALL REGISTER SAVE SUBRT. 

;TRY TO CLEAR THE 

iEXT'D ERROR REPORTING FLAG 

jEXIT IF FLAG NOT SET. 

;REPORT UNEXPECTED BMP CODES FOUND. 

MOV R!. (SP) 

MOV •EF0503. 
MOV •2. CSP) 

MOV SP.RO 
TRAP CJPNTB 
ADD «6.SP 

iGET THE START ADDRESS OF THE BMP CODE QLtUE. 

;GET THE MESSAGE TO BE REPORTED. 

J GET THE NCrSER OF THE TEST THAT WAS EXECUTING. 

I GET BMP CODE THAT WAS REPORTED OFF THE QUEUE. 

:G0 REPORT THE BMP CODE. 

J CHECK IF ALL COOES HAVE BEEN REPORTED. 

tIF IT IS NOT THE LAST BMP CODE THEN LOO'-. 



(SP^ 



J CHECK IF OVERFLOW HAS OCCURRED. 

J THE CONDITIONS FQR OVERFLOW ARE: THE POINTER CONTAINS THE ADDRESS OF THE 
LAST CELL IN THE QUEUE. AND A BMP CODE HAS ALREADY BEEN WRITTEN INTO THAT 
CELL. 



CMP R2.«eMPCQE-4 

BNE 60* 

TST 2(R2) 

BEQ 60) 

MOV (R5)».R1 

MOV (R5).R4 

MOV «EM9305.R5 



iCHECK IF THE POINTER IS AT THE LAST LOCATION. 

;EXIT IF NOT AT THE LAST LOCATION. 

J CHECK FOR A BMP CODE IN THE LAST CELL 

lEXlT IF NO OVERFLOW HAS OCCURED, CELL EMPT-. 

iGET THE TEST NUMBER OFF THE QUEUE. 

iGET THE BMP CODE OFF THE QUEUE. 

I SELECT THE MESSAGE TO BE REPORTED. 



J5 
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GLOBAt ERROR REPORTING ROUTINE ER9S01 



2SA8 017572 








PRINTX 


«EF9502 


; REPORT OVERFLOW CONDITION. 






017372 


012746 


005355 










MOV 


0EFS302. 


017576 


012746 


000001 










MOV 


•1, (SP 


017402 


010600 












MOV 


SP.RO 


017404 


104415 












TRAP 


C»PNTy 


017406 


062706 


000004 










ADD 


•4.SP 


2549 017412 


004767 


000002 




JSR 


PC. 50* 


{REPORT THE LAST BMP CODE PLACED ON THE 


QUEUE. 


2550 017416 


000414 






BR 


60 < 


jEXIT. 






2351 


















2552 017420 






50»: 


PRINTX 


•EF930l.R5.Rl,R4 


; PRINT THE MESSAGE. 






017420 


010446 












MOV 


R4. -(SP) 


017422 


010146 












MOV 


Rl. (SP) 


017424 


010546 












MOV 


R5.-(SP) 


017426 


012746 


005255 










MOV 


«£F9301 . 


017432 


012746 


000004 










MOV 


•4. (SP) 


017436 


010600 












MOV 


SP.RO 


017440 


104415 












TRAP 


C»PNTX 


017442 


062706 


000012 










ADO 


«12.SP 


2353 017446 


000207 






«TS 


PC 


jRETURN. 




2354 017450 






60*: 


PASS 




1 RESTORE THE GPR CONTENTS. 






017450 


004736 








JSR 


PC.aCSP)* ;RETURN 


TO PREG05 SUBRT. 


2555 


















2356 017452 








ENOMSG 










017452 












L10016: 






017452 


104423 












TRAP 


CJMSG 



I<5 
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.SBTTL GLOBAL SUBROUTINES SECTION 



2556 
2366 
2567 
2560 
2369 
2370 
2S-'l 



THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES 
THAT ARE USED IN MORE THAN ONE TEST. 
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HA 
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2373 
2374 
2575 
2376 
2377 
2378 
2579 
2560 
2381 
2382 
2383 
2384 
2385 
2386 
2387 
2386 
238«» 
2390 
2391 
2392 
2393 
2394 
2395 
2396 
2397 
2396 
2399 
2400 
2401 

2402 
2403 
2404 
2405 
2406 
2407 
2408 
2409 
2410 
2411 
2412 
2413 
2414 
2415 
2416 
2417 
2418 
2419 
2420 
2421 
2422 
2423 
2424 
2425 
2426 
2427 
2428 



017454 
017454 



017460 
017462 
017464 
017466 



017472 
017474 
017476 
017500 
017504 
017506 
017510 
017512 
017514 
017516 
017520 



.SBTTL GLOBAL SUBROUTINE 



ALTFLO 



- ALTER DEVICE REGISTER FIELDS ROUTINE 
THIS SUBROUTINE ALTERS THE SPECIFIED FIELD OF THE SPECIFIED DEVICE 
REGISTER FOR THE SPECIFIED LINES. THIS ROUTINE CAN BE USED TO SET 
OR CLEAR BITS WITHIN SELECTED FIELDS OF SELECTED REGISTERS. 
USE EXAMPLES: SET RX. BAUD. RATE FIELDS ON LINES 3 AND 6. 
CLEAR TX.DMA BITS ON ALL LINES. 

INPUTS: Rl - ADDRESS OF THE REGISTERS TO ALTER. 

R2 - BIT FIELDS SET TO DESIRED STATES. 
R3 BIT MAP OF LINES FOR WHICH TO ALTER REGISTER. 
R4 MASK OF BITS TO ALTER CI INDICATES CHANGE BIT). 
CSRA CONTAINS THE ADDRESS OF THE DEVICE CSR. 
lESTAT SAVED STATES OF THE INTERRUPT ENABLE BITS. 

OUTPUTS: DEVICE REGISTERS - SPECIFIED REGISTER FIELDS ALTERED. 

CSR IND.ADR.REG FIELD - DESTROYED. 



CALLING SEQUENCE: 



JSR 



PC.ALTFLD 



COMMENTS: THIS ROUTINE READS THE SPECIFIED REGISTERS FOR ALL LINES 

WITH NUMBERS LOWER THAN THE HIGHES SPECIFIED LINE. 

THIS ROUTINE DOES NOT READ THE CSR. 

SUBROUTINES CALLED: NONE. 



004567 164316 



ALTFLO:: SAVE 



;SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 :CALL REGISTER SAVE SUBRT. 



SET UP TO LOOP FOR EACH LINE: 

PREPARE THE WORD TO BE OREO INTO THE REGISTER CONTENTS. 

SET UP THE WORD TO WRITE INTO THE IND.ADR.REG FIELD OF THE CSR. 



010400 
005100 
040002 

016705 162616 



MOV 
COM 
6IC 
MOV 



R4.R0 

RO 

R0.R2 
IESTAT.R5 



jCALCULATE THE NEW CONTENTS OF THE 
J REGISTER FIELDS WHICH ARE TO BE 
s ALTERRED BY THIS ROUTINE. 
J SET UP TO WRITE IND.ADR.REG FIELD TO 



LOOP ONCE FOR EACH LINE. ALTERING THE SPECIFIED FIELD IN THE SPECIFIED 
REGISTER IF THE LINE HAS BEEN SELECTED FOR ALTERING. 

EXIT THE LOOP IF NO MORE LINES TO ALTER. OR IF WE HAVE ALTERED THE MAX 
ALLOWABLE NUMBER OF LINES CAS SPECIFIED BY NUMLNS). 



000241 
006003 
103006 

010577 162536 

011100 

040400 

050200 

010011 

005205 

005703 

001365 



> - 
2»: 



4»: 



CLC 
ROR 

BCC 
MOV 
MOV 
BIC 
BIS 
MOV 
INC 
TST 

BNE 



R3 
4« 

R5.SCSRA 

CRD.RO 

R4,R0 

R2.R0 

RO.CRl) 

R5 

R3 

2» 



:PREPARE FOR ROTATE. "TST R5" DOES THIS BElOW. 

jGET THE LINE SELECT BIT FOR THIS LINE. 

iSKIP SETUP IF LINE IS NOT SELECTED. 

{SET OUT CSR IND.ADR.REG FIELD TO THIS LINE. 

jGET THE PRESENT CONTENTS OF THE REG TO ALTER. 

jCLEAR THE BIT FIELDS WE ARE TO ALTER. 

lOR IN THE NEW STATES OF THE FIELDS. 

jWRITE THE NEW REGISTER CONTENTS TO THE REG. 

jSET LINE NUMBER TO THE NEXT LINE. 

tCHECK FOR UNHANOLEO LINES. CLEAR CARRt FLAG. 

I LOOP IF SELECTED LINECS) IS NOT HANDLED. 



M5 
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^429 

nJ^Hf .PESTORE GPRS. 

P4S1 Sw^fi 0^^07 ore -^^^ PC.8CSP). jRETURN TO PREG05 SUBRT. 

^451 017524 000207 RTS PC jRETURN TO CALLING ROUTNE . 
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2435 






2434 






2435 






2436 






2437 






2438 






2459 






2440 






2441 






2442 






2443 






2444 






2445 






2446 






2447 






2448 






2449 






2450 






2451 






2452 






2453 






2454 






2455 






2456 






2457 






2458 






2459 






2460 






2461 


017526 






017526 


004567 


2462 


017532 


005067 


2463 






2464 






2465 






2466 


017536 


012705 


2467 






2466 






2469 


017542 


005000 


2470 


017544 


012767 


2471 


017552 


005767 


2472 


017556 


001410 


2473 


017560 


005200 


24 74 


017562 


001373 


2475 


017564 


005305 


2476 


017566 


003371 


2477 






2478 






'Nil ^ A 

2479 






2480 






2481 


017570 


005067 


2482 


017574 


00024 1 


e4oo 


Ol 75 7o 


000401 


2484 






2485 






2486 






2487 






2488 


017600 


012704 



SBTTL GLOBAL SUBROUTINE CALMSL 

* * **************************«********«***«^**««««*«****** * 

* - CALIBRATE MILLI SECOND LOOP '"OUNT SUBROUTINE 

♦ THIS SUBROUTINE CALIBRATES THE TIMING LOOP WHICH IS USED IN THE MSLOOP 

* ROUTINE. THIS SUBROUTINE CALCULATES A VALUE FOR THE MSLCNT VARIABLE 

♦ WHICH IS THE NUMBER OF SOFTWARE LOOPS WHICH TAKES 1 MS TO EXECUTE IN 

♦ THE MSLOOP ROUTINE. THIS ROUTINE CALIBRATES THE COUNT BY USING THE 

♦ LINE TIME CLOCK (LTC). SO IF NO LTC IS AVAILABLE THE DEFAULT VALUE FQR 

* THE DELAY COUNT MUST BE USED. 



INPUTS: 



OUTPUTS: 



MSLCNT DEFAULT 1 MS DELAY LOOP COUNT VALUE. OR 

VALLt FROM PREVIOUS CALIBRATION. 
MSTICK NUMBLY OF MS PER LTC CLOCK TICK. 

TIMERl - TIMER COUNTER CHANGED BY LTC INTERRUPT SERVICE RTN. 
CLKHR2 - NUMBER OF LTC CLICKS PER SECOND C50 OR 60). 

CARRY - SET IF LTC IS AVAILABLE. AND NEW CALIBRATION PERFORMED 
MSLCNT - NEU 1 MS DELAY LOOP COUNT VALUE IF LTC AVAILABLE. OR 
UNCHANGED IF NO LTC IS AVAILABLE. 



* CALLING SEQUENCE: JSR PC. CALMSL 

* COMMENTS: 
* 

* SUBORDINATE ROUTINES CALLED: UNSDIV.OOPS. 



164244 
000210 



000001 



000001 
162566 



CALMSL : : SAVE 
CLR 



62 » 



JSR 



{SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 sCALL REGISTER SAVE SUBRT. 

! CLEAR THE 2ND TIME FLAG. 



SYNCHRONIZE WITH THE LTC. 



162572 



t - 
2%. 



4$, 



MOV 



CLR 
MOV 
TST 
BEQ 
INC 
BNE 
DEC 
BGT 



«1.R5 



:SET OUTER LOOP COUNTER TO 1 LOOP. 
: INCREASE THE VALUE LOADED INTO THIS COUNTER IF THE <♦ 
; FOLLOWING LOOP FAILS ON FUTURE. FASTER PROCESSORS. <♦ 
RO : CLEAR THE WAIT FOR CLOCK INT COUNTER. 

*1. TIMERl sSET UP COUNT OF 1 TO SYNCH WITH LTC. 

TIMERl jCHECK FOR COUNTER HAVING GONE TO ZERO. 

6* sJUMP OUT OF LOOP IF LTC HAS INTERRUPTED. 

RO ;COUNT THIS ITERATION OF THE INNER LOOP. 

4$ ;LOOP IF COUNTER HAS NOT TURNED OVER. 

R5 ; DECREMENT THE INNER LOOP COUNTER. 

4» ;LOOP IF OUTER LOOP COUNT NOT UP. 



IF WE GOT NO LTC INTERRUPT, INDICATE THAT THERE IS NO LTC AVAILABLE. 
LTC MUST BE FLAKEY. OR NOT REALLY AN LTC AT ALL. 



CLR 
CLC 
BR 60* 



CLKHRZ 



jCLEAR LTC FREQUENCY WORD TO INDICATE NO LTC. 

S INDICATE FAILURE FOR RETURN, 

{BYPASS THE FOLLOWING CALIBRATION PROCEDURES. 



WE ARE NOW SYNCHRONIZED WITH THE LTC. 
SET UP FOR THE CALIBRATION LOOP. 



6$: 



MOV 



#TIMER1.R4 



;WILL TEST TIMERl IN THE LOOP BELOW. 
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2489 
2490 
2491 
2492 
2493 
2494 
2495 
2496 
2497 
2496 
2499 
2500 
2501 
2502 
2505 
2504 
2505 
2506 
2507 
2506 
2509 
2510 
2511 
2512 
251S 
2514 
2515 
2516 
2517 
2516 
2519 
2520 
2521 
2522 
2525 
2524 
2525 
2526 
2527 
2526 
2529 
2550 
2551 
2552 
2555 
2554 
2555 
2556 
2557 

2558 
2559 
2540 
2541 



017604 
017606 
017610 
017612 

017616 
017622 
017624 
017650 
017652 
017654 
017656 
017640 
017642 
017644 
017646 
017650 



017654 
017656 
017662 
017664 
017666 
017670 
017672 
017674 
017676 
017700 
017702 



017704 
017710 
017712 
017714 
017720 
017722 
017726 
017752 
017756 
017740 

017742 
017742 
017744 

017746 

017750 



005001 






CLR 


Rl 


iCLEAR THE OUTER LOOP COUNTER. 


005002 






CLR 


R2 


1 INDICATE TO CHECK ALL BIFS 0^ TIMERl. 


005005 






CLR 


R5 


•INDICATE TO CHECK FOR TIHERl CLEAR. 


012714 


000001 




MOV 


•1 .(R4) 


iLOAD TIMERl WITH COUNT QF 1. 


016705 


162554 


8«: 


MOV 


nSLCNT.R5 


ILOAD nS LOOP COUNT. 


011400 




10«: 


HOV 


(R4).R0 


iGET THE TIMERl VALUE. 


010067 


000120 




nov 


R0.64I 


iSAVE WORD (LIKE IN THE REAL LOOP). 


040200 






BIC 


R2.R0 


1 LEAVE ALL THE BITS. 


020005 






CHP 


R0.R5 


(COMPARE AGAINST ZERO. 


000261 






SEC 




iSET CARRY IN CASE OT SUCCESS. 


001406 






BEQ 


12 ( 


•EXIT LOOP IF TIMERl HAS CLEARED. 


005505 






OEC 


R5 


iCOUNT OOUN THE INSIDE MS LOOP COUNT. 


001567 






BME 


lot 


It COP IF MS NOT UP. 


005501 






DEC 


Rl 


{DECREMENT THE MS TIME COUNT. 


001565 






BNE 


81 


iKEEP LOOPING. 


004767 


000440 




JSR 


PC. OOPS 


|UE OVERFLOWED. SOMETHING IS URONG. ABORT. 



005401 
016702 
010205 
160502 
010204 
005005 
005501 
100405 
060504 
005505 
000775 



016701 
010405 
010502 
004767 
105402 
004767 
010167 
005167 
001277 
000261 



004756 
000207 

OOOOOO 
000000 



162474 



162444 



005140 

000566 
162424 

000010 



UE HAVE NOU HAVE LOOP COUNT INFORMATION FOR ONE CLOCK TICK. 

UE HAVE NEGATIVE OF NUMBER OF OUTER LOOPS IN Rl. EACH IS MSlCNT INNER LOOPS. 
i€ HAVE THE PORTION OF 'HE LAST OUTER LOOP NOT EXECUTED. IN R5. 
NOU UE CALCULATE THE TOTAL NUMBER OF INNER LOOPS EXECUTED. 



12* : 



14«: 



I • 

I 01) 
I 

16* : 



181: 



60* : 



62* ! 
64(: 



NEG 


Rl 


MOV 


MSLCNT, R2 


MOV 


R2.R5 


SUB 


RS.R2 


MOV 


R2.R4 


CLR 


R5 


OEC 


Rl 


BMI 


161 


ADD 


R5.R4 


ADC 


R5 


BR 


141 


E THE TOTAL NUMBER 


MOV 


MSTICK.Rl 


MOV 


R4.R5 


MOV 


R5.R2 


JSR 


PC.UNSDIV 


BCS 


161 


JSR 


PC. OOPS 


MOV 


Rl. MSLCNT 


COM 


62 » 


BNE 


?\ 


SEC 




PASS 






J 


RTS 


PC 


.WORD 


0 


.WORD 


0 



I GET NUMBER OF OUTER LOOPS. 

iGET THE NUMBER OF INNER LOOPS PER OUTER LOOP. 

iCOPY NUMBER OF LOOPS FQR MULTIPLY. 

iCALC • OF INNER LOOPS DONE IN LAST OUTER LOOP 

I AND ADD TO ACCUMULATOR LSUORD. 

I CLEAR ACCUMULATOR MSUORD. 

iCHECK Rl FOR 0 CONDITION 

I SKIP MULTIPLICATION IF ZERO 

iMULTIPLY NUMBER OF INNER 

I LOOPS PER OUTER LOOP Bv 

iNUMBER OF OUTER LOOPS PERFORMED. 

I»MER LOOPS BY THE NUMBER OF MS PER LTC TICK. 

I • OF MS PER LTC TICK IS DIVISOR. 
tLSUORO OF LOOP COUNT IS LSUORD OF DIVIDEND. 
iMSUORD OF LOOP COUNT IS MSUORD OF DIVIDEND. 
lOIVlOC NUMBER OF LOOPS BY MS PER LTC TICK. 
iBYPASS OOPS IF UE'RE OK. 

iCLOCK ROUTINES ARE NOT LONG ENOUGH. OR BuC. 

I SET NEU VALUE FOR MS LOOP COUNT. 

iSET THE 2N0 ITERATION FLAGS IF 1ST ITERATION. 

iBRANCH IF ONLY ONE ITERATION DONE. 

I SET THE SUCCESS FLAG FOR EXIT. 



I RE STORE GPRS. 
PC.a(SP). 

I CARRY • SUCCESS FLAG. 



iRETORN TO '"'^005 SL«R', 
SET IF SUC> 



|2ND CALIBRATION ITERATION FlACS. 

I DUMMY UORO FOR STORAGE OF THE READ UORO. 
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254* 
2S4S 
2549 
2550 
2551 
2552 
2555 
2554 
2555 
2556 
2557 

2556 
2559 
2560 
2561 
2562 
2565 
2564 
2565 
2566 
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<i£0 6 7 



2567 
2566 
2569 
2570 
2571 
2572 
2575 

2574 



017752 
017752 
017756 
017762 
017764 
017770 
017772 
017774 
017776 
017776 
020000 



004567 164020 
005067 162556 
011011 

005767 162550 
000261 
001401 
000241 

004756 
000207 



SBTTL GLOBAL SUeR0UTII>C 



CKTRAP 



«• 
«• 

»• 
t* 
J* 
»• 
J* 
I* 
I* 
«• 
I* 
i» 

!• 
»• 

I* 
!• 

I*' 



CHECK TRAP ROUTINE 

THIS SUBROUTINE IS USED TO CHECK FOR A BUS TIME -OUT TRAP (004 TRAP) 
WHICH IS CAUSED BY AN ACCESS TO A NGN EXISTENT MEMORY OR I/O LOCATION. 
IF THE TRAP DOES NOT OCCUR. THIS ROUTINE RETURNS A SUCCESS INDICAUON. 



INPUTS: 



OUTPUTS: 



RO SOURCE ADDRESS POR MOVE. 

Rl - DESTINATION ADDRESS FOR MOVE. 

(RO) - SOURCE FOR THE MOVE. 

(Rl) WRITTEN TO THE CONTENT!: OF (RO). 

CARRr FLAG - SET ON RETURN IF NO 00* TRAP DETECTED. 

TP4FLG - NONZERO IF TRAP OCCURRED. CLEARED OTHERWISE. 



CALLING SEQUENCE: 



JSR 



PC. CKTRAP 



COMMENTS: IF THIS SUBROUTINE CAUSES A TRAP. EITHER THE ADDRESS WHICH 
IS LABELED AORPTR WILL BE THE TRAP PC ADDRESS ON THF STACK. 

SUBORDINATE ROUTINES CALLED: NONE. 



CKTRAP:: SAVE 

CLR 
MOV 

ADRPTR:: TST 
SEC 
BEG 
CLC 

601: PASS 
RTS 



(SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 jCALL REGISTER SAVF SUBRT, 

TP4FLG J CLEAR THE 004 TRAP FLAGS. 

(RO).(Rl) iPERFORM THE MOVE IN QUESTION. 

TP4FLG I CHECK FOR OCCURENCE OF TRAP. 

I INDICATE SUCCESS. 
60» lEXlT WITH SUCCESS IF TRAP DID NOT OCCUR. 

I INDICATE FAILURE. 

iRESTORE GPRS. 
JSR PC.S(SP)> : RETURN TO PREGOS 

PC 



SUBRT. 
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2580 
2581 
2562 
2585 
2584 
2585 
2586 
258: 
2588 
25d<» 
2590 
2591 
2592 
2595 
2594 
2595 
2596 
2597 
2598 
2599 
2600 
2601 
2602 
2605 
2604 

2605 
2606 
2607 
2606 
2609 
2610 
2611 
2612 
2615 
2614 
2615 
2616 
2617 

2618 
2619 



.S8TTL GLOBAL SUBROUTINE 



- CLNRST 



020002 

020002 004567 165770 



020006 004767 001544 
020012 105002 



020014 004767 000522 

020020 
020020 

020020 004756 
020022 000207 



- CLEAN RESET OF THE DEVICE UNDER TEST 
THIS SUBROUTINE IS USED TO RESET THE DUT TO A KNOWN STATE. 
THE DUTS SELF-TEST IS SKIPPED. AND THE FIFQ IS PURGED OF ANt ERROR 
CODES. ETC. 

ir THE RESET DOES NOT SUCCESFULLY COMPLETE. THEN THE CARRY BIT IS 
PASSED BACK TO THE CALLING ROUTINE C CLEAR). 



CSRA - 
TXBFCA 
ERRNBR 
ERRTBL 



CONTAINS THE ADDRESS OF THE CSR 

CONTAINS ADDRESS OF DUT DMA BUFFER COUNT REGISTER. 
ERROR NUMBER FQR POSSIBLE ERROR REPORT. 
ERRTYP.ERNBR.ANO ERRMSG SET UP CORRECTLY, 



THE OUT PERFORMS ITS RESET FUNCTION INTO A KNOWN STATE. 



t* 

!* 
!• 
I* 
!♦ 

i* INPUTS: 
l» 
I* 

!♦ 
!* 

i* OUTPUfS: 
i* 

!• 
!• 
!• 
!» 

I* CALLING SEQUENCE 

s* COMMENTS: THIS SUBROUTINE CAN REPORT ERRORS WITH NUMBERS ERRNBR 
!* THIS ROUTINE DOES NOT DESTROY THE VALUE OF ERRNBR. 

s* 

I* SUBORDINATE ROUTINES CALLED: DELAY. MSLGET. PUFIFQ. RESETT . 



CARRY 

ERRBLK 

lESTAT 



CLEAR INDICATES THE TEST IS TO BE ABORTED. 
VALUE MAY BE DESTROYED. 
TX AND RX INTERRUPT FLAGS ARE CLEARED. 

S CSR ARE CLEARED. 



TX AND RX INTERRUPT ENABLE BITS IN THE OUT 
JSR PC. CLNRST 



CLNRST:: SAVE 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 sCALL REGISTER SAVE SUBRT . 



t ♦ 

J RESET 
I THIS 
i 



THE DUT. 

ROUTINE REPORTS ERRORS WITH NUMBERS FROM ER<?NBR THRU ERRNBR *2. 



JSR 
BCC 



PC, RESETT 
601 



jPESET THE DUT TO A KNOWN STATE. 

lEXIT ROUTINE WITH ABORT TEST INDICATOR. 



i PURGE 

I - 



THE FIFO or ERROR CODES, SAVE ANY BMP COOES FOUND. 
JSR PC.PUriFO I PURGE THE FIFO. 



60»: 



PASS 
RTS 



PC 



lEXlT THE TEST USING RESETT OR PUFIFO STATUS. 
I RESTORE GPRS. PASS THE FOLLOWING INTACT: 
JSR PC.8(SP)» J RE TURN TO PREG05 SUBRT, 

iCARRY BIT: IF CLEAR. THEN ABORT THE TEST. 
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2622 
2t2i 
2b2A 
262b 
2b2b 
2627 
2626 
2629 
26i0 
26SI 
2612 
2655 
2654 
2635 
2636 

2637 020024 

020024 004567 163746 

2638 020030 012701 000020 

2639 020034 005020 

2640 020036 005301 

2641 020040 001375 

2642 020042 
020042 004736 

2643 020044 000207 
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.SBTTL GLOBAL SUBROUTINE 



CLR16U 



' CLEAR SIXTEEN WORDS ROUTINE 
TMIS SUBROUTINF CLEARS 16 UOROS STARTING UITH THE SPECIFIED mORQ. 



RO - ADDRESS OF THE FIRST WORD TO CLEAR. 
(RO) TO (R0»15) - 16 WORDS OF r«MORr ARE CLEARED TO 0. 



t INPUTS: 

• OUTPUTS 
* 

* CALLING SEQUENCE: JSR PC.CLR16W 
* 

• COMMENTS: 
* 

* SUBORDINATE ROUTINES CALLED: NONE. 



CLR16W:: SAVE 
MOV 

2t: CLR 
DEC 
BNE 

60t : PASS 
RTS 



•16.. Rl 
(RO)* 
Rl 
2* 



PC 



(SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 iCALL REGISTER SAVE SU6RT. 

(SET THE LOOP COUNTER TO 16. 
I CLEAR A WORD OF MEMORY. 
I COUNT THIS LOOP. 
(LOOP IF NOT 16 WORD CLEARED, 
s RE STORE GPRS. 

JSR PC.8(SP)» s RE TURN TO PREG05 SUBRT, 



r6 
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2645 
2646 
2647 
2640 
2649 
2650 
2651 
2652 
2653 
2654 
2655 
2656 
2657 
2656 
2659 
2660 
2661 
2662 
2663 
2664 
2665 
2666 
2667 
2668 

2669 
2670 
2671 
2672 
2673 
2674 
2675 
2676 
2677 
2678 
2679 
2680 
2661 
2682 
2663 
2684 
2685 

2686 



020046 
020046 



020052 
020054 
020060 
020062 
020064 
020070 
020074 
020076 
020102 
020104 
020106 
020110 
020116 
020120 
020120 
020122 



004567 163724 



0C6305 
016501 
005201 
103402 
010165 
005767 
001411 
020167 
101002 
000241 
000404 
056567 
000261 

004736 
000207 



002464 



002464 
162132 

162124 



002410 
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- COUNT ERROR ROUTINE 
THIS SUBROUTINE IS USED TO COUNT A "DATA" ERROR ON THE SPECIFIED 
LINE. IT CHECKS WHETHER ERROR SUMMARY REPORTING IS ACTIVE. OR SHOULD 
BE MADE ACTIVE ON THIS LINE, AND ACTIVATES IT IF NECESSARr, 



• INPUTS: 



R5 LINE NUMBER OF LINE UNDER CONSIDERATION. 



OUTPUTS: 



ERCNTB 
ERSMRF 
NOERPT 

CARRY 
ERCNT 
ERSMRF 



LABEL AT BASE OF ERROR COUNTERS TABLE. 

- ERROR SUMMARY FLAGS (BIT SET IF LINE IN SUMMARY MODE). 
NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE. 

SET IF LINE IS IN ERROR SUMMARY MODE. 

ERROR COUNTER INCREMENTED FOR SPECIFIED LINE. 

- BIT SET IF LINE SHOULD BE IN SUMMARY MODE. 



* CALLING SEQUENCE: 



JSR 



PC. CNTERR 



• COMMENTS: 

* SUBORDINATE ROUTINES CALLED: NONE. 



i - 



CNTERR:: SAVE 



iSAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 ;CALL REGISTER SAVE SUBRT. 



COUNT THE ERROR ON THE COUNTER FOR THE SPECIFIED LINE, 



2*: 



162S44 4$: 
60<j 



ASL 


R5 


jFORM WORD OFFSET FROM LINE NUMBER. 


MOV 


ERCNTB(R5),Rl 


jGET THE PRESENT ERROR COUNT FOR THIS LINE. 


INC 


Rl 


1 COUNT ERROR. 


8CS 


2< 


;OVERFLOW? YES. DON'T UPDATE COUNTER IN TABLE. 


MOV 


R1.ERCNTB(R5) 


(UPDATE ERROR COUNTER TABLE ENTRY. 


TST 


NOERPT 




BEQ 


60 » 


;SUMMARYS DISABLED? YES. EXIT WITH CARRt 0. 


CMP 


Rl. NOERPT 


jNO. CHECK FOR ENOUGH ERRORS FOR SUMMARY USE. 


BHI 


4$ 


jENOUGH ERRORS TO USE SUMMARY? YES. GO HANDLE. 


CLC 




(INDICATE NOT TO USE SUMMARY REPORT YET. 


BR 


60 < 


;EXIT WITH CARRY 0. 


BIS 


BITTBLCRS), ERSMRF jSET THE ERROR SUMMARY FLAG FOR LINE. 


SEC 




(INDICATE TO USE SUMMARY REPORT. 


PASS 




(RESTORE GPRS 




JSR 


PC.8CSP)* (RETURN TO PREG05 SUBRT 


RTS 


PC 





G6 
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2600 
2609 
2690 
2691 
2692 
2695 
2694 
2695 
2696 
2697 
2690 
2699 
2700 
2701 
2702 
2705 
2704 
2705 
2706 

2707 
2708 
2709 
2710 
2711 
2712 
2715 
2714 

2715 
2716 
2717 



020124 
020124 
020130 
020132 
020156 
020140 
020144 
020150 
020152 
020156 
020156 
020160 



004567 
010401 
012702 
005003 
012704 
004767 
103002 
004767 

004736 
000207 



163646 

177777 

020162 
000130 

000136 
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DELAY 



DELAY SUBROUTINE - 
THIS SUBROUTINE IS USED TO DELAY A VARIABLE NUMBER OF HILLI -SfcCONOS. 

!* 

I* INPUTS: R4 CONTAINS THE NUMBER OF MS TO DELAY. 

j» MSLCNT. 

:♦ 

J* 0UTPU1S: NONE, 
!* 

:* CALLING SEQUENCE: JSR PC. DEL AY 
;* 

:* COMMENTS: IF NO HARDWARE CLOCK INTERRUPTS ARE OCCURING. CONTROL-CS MILL 

I* NOT BE HONORED FOR THE DURATION OF THE DELAY. 

s» 

i* SUBORDINATE ROUTINES CALLtD: NONE. 



DELAY:: SAVE 



MOV 
MOV 
CLR 
MOV 

JSR 
BCC 

JSR 

PASS 



020162 177777 



60$: 



62t: 



JSR 

R4.RI 

•-I.R2 

R3 

«62(.R4 

PC.MSLOOP 

60t 

PC. OOPS 



RTS 
.WORD 



PC 



JSR 



I SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 jCALL REGISTER SAVE SUBRT. 

jPASS NUMBER OF MS DELAY AS TIME-OUT VALUE. 
sTELL MSLOOP ROUTINE TO CHECK ALL BITS. 
sTELL MSLOOP RTN TO CHECK FOR ALL BITS CLEAR. 
sTELL MSLOOP TO CHECK DUMMY NGN ZERO WORD. 
I DELAY THE REQUESTED ♦ OF MS. 
;EXIT ROUTINE IF UE TIMEO-OUT.l 
;IF NO TIME-OUT. BAD PROGRAM OR HOST MACHINE. 
: RESTORE GPRS. 

PC,8(SP)* {RETURN TO PREG05 SUBRT. 



s DUMMY. NON ZERO WORD. 
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PAGE 60 



^:i9 

2720 
2721 
2722 
2725 
2724 
2725 
2726 
2727 
2728 
2729 
2730 
2731 
2732 
2755 
2734 
2735 
2756 
2757 
2758 
2759 
2740 
2741 
2742 
2745 
2744 
2745 
2746 
2747 
2748 
2749 
2750 
2751 
2752 
2753 
2754 
2755 
2756 
2757 

2758 
2759 
2760 
2^61 
2762 
2763 
2764 
2765 
2766 
2767 
2768 
2769 
2770 
2771 
2772 
2773 
2774 
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MSLGET 



J* 

!* 
* 

* 
* 

* 
* 
* 

* 

* 
* 
* 
* 
* 
* 
* 

* 
* 

* 
* 

J* 
i* 
i* 

;♦' 



- MILLI SECONDS LOOP WHICH RETURNS READ WORD AND REMAINING TIME 

THIS SUBROUTINE IS A GENERAL PURPOSE TEST LOOP SUBROUTINE. IT IS USED 

TO VERIFY THAT A CERTAIN ACTION OCCURS BEFORE A TIME OUT PERIOD. THE 

CALLING ROUTINE PASSES IN WHICH BITS SHOULD BE SET AND CLEARED FOR THE 

DESIRED CONDITION AND THE TIME-OUT VALUE IN MILLI SECONDS. 

THIS ROUTINE CHECKS FOR THE DESIRED CONDITION UPON ENTRANCE INTO THE 

ROUTINE AND THEN ONCE EACH MILLI -SECOND THERE AFTER. 

UPON RETURN. THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION 

IS RETURNED BY THIS SUBROUTINE. 

INPUTS: Rl - TIME-OUT VALUE IN MILLI-SECONDS CUP TO 64K MS). 

R2 - BIT MAP OF BITS TO TEST (I INDICATES TO TEST THE BIT). 

R3 - DESIRED STATES OF THE INDICATED FIELDS IN R2. 

R4 - ADDRESS OF THE WORD TO TEST. 

MSLCNT - MILLI SECOND SOFTWARE LOOP COUNT. 

OUTPUTS: RO - THE LAST WORD WHICH WAS READ TO CHECK FOR THE CONDITION. 

Rl - REMAINING NUMBER OF MS IN TIME-OUT TIME. 

CARRY - SUCCESS FLAG (SET IF CONDITION IS MET BEFORE TIME OUT), 



CALLING SEQUENCE: 



JSR 



PC. MSLGET 



COMMENTS: THIS ROUTINE WORKS WITH OR WITHOUT A HARDWARE CLOCK. BUT THt 
CALIBRATION IS ONLY GUARENTEED WHEN A LINE CLOCK IS AVAILABLE 
ON THE SYSTEM. 

THIS ROUTINE CAN BE USED AS A DELAY ROUTINE. BY SPECIFYING THE 
DESIRED DELAY AS THE TIME-OUT AND SPECIFYING A CONDITION TO 
LOOK FOR WHICH WILL NOT BE MET DURING THE DELAY. 
IF A TIME-OUT VALUE OF 0 IS SPECIFIED, THIS ROUTINE CHECKS FOR 
THE DESIRED CONDITION BEFORE RETURNING. IT INDICATES SUCCESS 
IF THE CONDITION IS MET. FAILURE OTHERWISE. 

SUBORDINATE ROUTINES CALLED: NONE. 



020164 

020164 004567 163606 



020170 005102 
020172 040203 



020174 005701 

020176 OOlOll 

020200 011400 

020202 010067 000070 

020206 040200 

020210 020003 

020212 00C261 

020214 001420 



MSLGET:: SAVE 



(SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 .-CALL REGISTER SAVE SUBRT. 



t ♦ 



SET UP MASK FOR REMOVING UNUSED BITS IN THE TEST WORD. AND CLEAR UNUSED 
i BITS IN THE DESIRED STATE WORD TO ALLOW DIRECT COMPARISON. 



COM 
BIC 



R2 

R2.R3 



iGET MASK OF UNUSED BITS. 

iMASK OUT UNUSED BITS IN DESIRED STATE WORD. 



t HANDLE THE TEST AND EXIT IF WE HAVE A 0 TIME-OUT VALUE, 
i - 



TST 
BNE 
MOV 
MOV 
BIC 
CMP 
SEC 
BEQ 



Rl 
21 

(R4).R0 
R0.62$ 
R2.R0 
R0,R3 

6$ 



I TEST THE TIME-OUT VALUE FOR ZERO. 
lIF NON-ZERO TIME-OUT. GO LOOP AND TEST. 
iGET THE WORD TO TEST BEFORE EXITING. 
(SAVE VALUE SO WE CAN RETURN IT. 
iMASK OUT UNTESTED BITS OF WORD. 
{COMPARE AGAINST DESIRED STATE WORD. 
(INDICATE SUCCESS IN CASE WORDS ARE EQUAL. 
(EXIT WITH SUCCESS IF WORDS ARE EQUAL. 



16 
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^775 


020216 


000241 


2776 


020220 


000416 


2777 






2778 






2779 






2780 


020222 


016705 


2781 


020226 


011400 


2782 


020230 


010067 


2783 


020234 


040200 


2784 


020236 


020003 


2785 


020240 


000261 


2786 


020242 


001405 


2787 


020244 


005305 


2788 


020246 


001367 


2789 


020250 


005301 


2790 


020252 


001363 


2791 


020254 


000241 


2792 






2795 






2794 






2795 






2796 


020256 


016700 


2797 


020262 






020262 


010066 




020266 


010166 




020272 


004736 


2798 






2799 






2600 


020274 


AAA ^ 

000207 


2801 






2802 






2803 






2804 


020276 


000000 





IS MAR 84 


09:15 PAGE 


60 1 












BR 


6t 


lEXlT WITH FAILURE. WORDS AREN'T EQUAL 


.•*^40N 


ZERO TIME 


OUT VAi OE . 


LOOP. WAITING FOR CONDITION OR TIME OUT . 


; 

2»: 


MOV 


MSLCNT.R5 


iLOAD MS LOOP COUNT. 


4«: 


MOV 


(R4),R0 


iGET THE WORD TO TEST. 




MOV 


R0.62$ 


J SAVE WORD IN CASE THIS IS THE LAST. 




BIC 


R2.R0 


jMASK OUT UNTESTED BITS OF WORD. 




CMP 


R0.R3 


: COMPARE AGAINST DESIRED STATE U'ORD. 




SEC 




;SET CARR^ IN CASE OF SUCCESS. 




BEQ 


6» 


sEXIT WITH SUCCESS IF WORDS ARE EQUAL. 




DEC 


R5 


iCOCWT DOWN THE INSIDE MS LOOP COUNT. 




BNE 


4» 


jLOOP IF MS NOT UP. 




DEC 


Rl 


J DECREMENT THE MS TIME COUNT. 




BNE 


2t 


sIF TIME NOT UP, LOOP TO COUNT ANOTHER 




CLC 




J CLEAR CARRT. WE TIMED-OUT. 



<;eo 



HAVE EITHER FOUND CONDITION. OR TIMED OUT (POSSIBLY FROM 0 TIME OUT VALUE). 
RESTORE THE LAST CONTENTS READ FROM THE TEST WORD. EXIT ROUTINE. 



61: 
60*; 



MOV 
PASS 



62».R0 
RO.Rl 



MOV 
MOV 
JSR 



t ♦ 



RTS PC 
( LOCAL STORAGE. 
62* : .WORD 0 



J PASS OUT THE LAST READ WORD. 
sRESTORE GPRS. EXCEPT THE FOLLOWING: 
RO.ROSLOTCSP) ;PUT RO IN STACK SLOT. 

Rl.RlSLOT(SP) :PUT Rl IN STACK SLOT. 

PC.a(SP)» ; RE TURN TO PREGOS SUBRT, 

:R0 LAST READ WORD CHECKED FOR CONDITION. 

;Rl REMAINING TIME (0 IF TIME OUT OCCUREO). 

SCARRY SET IF SUCCESS. CLEAR IF TIME-OUT. 



{STORAGE FOR THE LAST READ WORD. 



J6 
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2606 

2607 
2606 
2609 
2610 
2611 
2612 
2613 
2814 
2615 
2616 
2617 
2616 
2619 
2620 
2621 
2622 
2623 
2624 
2625 
2626 
2827 
2628 
2829 
2830 
2831 
2632 
2833 
2634 
2835 
2636 
2837 
2838 
?839 
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2640 
2841 
2642 
2843 
2644 
2845 
2646 
2847 



020300 

020300 004567 163472 



020304 004767 177654 
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MSLOOP 



♦ TEST LOOP SUBROUTINE 

♦ THIS SUBROUTINE IS A GENERAL PURPOSE TEST LOOP SUBROUTINE. II IS USED 
J* TO VERIFY THAT A CERTAIN ACTION OCCURS BEFORE A TIME OUT PERIOD. THE 

• CALLING ROUTINE PASSES IN WHICH BITS SHOULD BE SET AND CLEARED FOR THE 

♦ DESIRED CONDITION AND THE TIME OUT VALUE IN MILLI- SECONDS. 

* THIS ROUTINE CHECKS FOR THE DESIRED CONDITION UPON ENTRANCE INTO THE 

* ROUTINE AND THEN ONCE EACH MILLI SECOND THEREAFTER. 



* INPUTS: 

I* 
* 

t OUTPUTS; 



Rl - TIME-OUT VALUE IN MILLI SECONDS (UP TO 64K MS). 

R2 BIT MAP OF BITS TO TEST (1 INDICATES TO TEST THE BIT). 

R3 DESIRED STATES OF THE INDICATED FIELDS IN R2. 

R4 ADDRESS OF THE WORD TO TEST. 

MSLCNT - MILLI SECOND SOFTWARE LOOP COUNT. 

CARRY SUCCESS FLAG (SET IF CONDITION IS MET BEFORE TIME OUT 



* CALLING SEQUENCE 

* COMMENTS: 
* 
* 



JSR 



PC. MSLOOP 



THIS R(XJTINE WORKS WITH OR WITHCXJT A HARDWARE CLOCK. BUT TmE 
CALIBRATION IS ONLY GUARENTEED WHEN A LINE CLOCK IS AVAILABLE 
ON THE SYSTEM. 

THIS ROUTIh€ CAN BE USED AS A DELAY ROUTINE, BY SPECIF riNG THE 
DESIRED DELAY AS THE TIME-OUT AND SPECIFYING A CONDITION TO 
LOOK FOR WHICH WILL NOT BE MET DURING THE DELAY. 
IF A TIME OUT VALUE OF 0 IS SPECIFIED. THIS ROUTINE CHECKS FQR 
THE DESIRED CONDITION BEFORE RETJRNING. IT INDICATES SUCCESS 
IF THE CONDITION IS MET. FAILURE OTHERWISE. 



♦ SUBORDINATE ROUTINES CALLED: MSLGET. 



MSLOOP:: SAVE 



sSAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 sCALL REGISTER SAi/E SUBRT , 



020310 
020310 004736 
2948 020312 000207 



; CALLING TME MSLGET ROUTINE FROM THE MSLOOP ROUTINE ISOLATES THE CALLER OF 
i MSLOOP FROM THE RETURNED TEST WORD AND REMAINING TIME OUT VALUES. 

JSR PC. MSLGET jCALL THE MULTI PURPOSE MS LOOP AND SEARCH RTN. 

60t; PASS {RESTORE GPRS. 

JSR PC.a(SP). J RE TURN TO PREG05 SUBRT. 

RTS PC jCARRy SET IF SUCCESS. CLEAR IF TIME OUT. 



2650 
2851 
2852 
2855 
2854 
2855 
2856 
2857 
2858 
2859 
2860 
<;861 
2862 
2863 
2864 
2865 
2866 
2867 
2868 



Kb 
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'.CO 



OOPS 



PROGRAM ABORT SUBROUTINE 
THIS SUBROUTINE IS USED TO ABORT THE PROGRAM WHEN A FATAl ERROR IS 
DETECTED IN THE PROGRAM OR THE HOST SYSTEM HARDWARE. AN ERROR MESSAGE 
IS PRINTED GIVING SOME INFORMATION ABOUT THE NATURE Of THE ABORT. 

Rl ERROR CODE GIVING REASON FOR ABORT. 



* 
« 

• INPUTS: 

• OUTPUTS 
* 

* CALLING SEQUENCE 
* 

♦ COMMENTS: 
* 

* SUBORDINATE ROUTINES CALLED 



AN ERROR MESSAGE IS PRINTED. 

A LIST OF RETURN PC VAlUES FOR ALL SUBROUTINE CALLS IS PRINTED. 



JSR 



PC. OOPS 



NONE. 



2869 


020514 








OOPS: 


SAVE 


:SAVE CONTENTS OF GPRS RO THRU R5. 




020314 


004567 


163456 






JSR 


R5.PREG05 :CALL REGISTER SAVE SUBRT. 


2870 








i 


REPORT "HOST COMPUTER 


HARDWARE OR SOFTWARE BUG ENCOUNTERED." ERROR. 


2871 


020320 










ERRSF lOl.EMOlOl 








020320 


104454 










TRAP 


C»ERSF 




020322 


000145 










.WORD 


101 




020324 


020360 










.WORD 


EMOlOl 




020326 


000000 










.WORD 


0 


2872 










t 


REPORT "PROGRAM HUNG. 


WAITING FOR A CONTROL C 




2875 


020330 










PRINTF <^M0102 








020330 


012746 


020444 








MOV 


«EM0102. 




020334 


012746 


000001 








MOV 


#1. (SP) 




020340 


010600 










MOV 


SP.RO 




020342 


104417 










TRAP 


CIPNTF 




020344 


062 706 


000004 








ADD 


#4.SP 


2874 


020350 








2%: 


BREAK 


:LOOK FOR OPERATOR CONTROL C INPUT. 






020350 


104422 










TRAP 


CIBRK 


2875 


020352 


000776 








BR 2t 


; INFINITE LOOP. 




2876 


020354 








60* : 


PASS 


sDON'T NEED THIS. BUT SOMEBODY MAY CHANGE THIS 




020354 


004736 








JSR 


PC.8(SP)» sRETURN TO PREG05 SUBRT. 


2877 


020356 


000207 








RTS PC 


{ ROUTINE IN THE FUTURE. SO BE CONSISTANT. 


2878 


















2879 


020360 


110 


117 


123 


EMOlOl:: .ASCIZ /HOST COMPUTER HARDWARE OR SOFTWARE BUG ENCOUNTERED./ 






020363 


124 


040 


103 












020366 


117 


lis 


120 












020371 


125 


124 


105 












020374 


122 


040 


110 












020377 


101 


122 


104 












020402 


127 


101 


122 












020405 


105 


040 


117 












020410 


122 


040 


123 












020413 


117 


106 


124 












020416 


127 


101 


122 












020421 


105 


040 


102 












020424 


125 


107 


040 












020427 


105 


116 


103 












020432 


117 


125 


116 












020435 


124 


105 


122 











Lb 
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020440 


105 


104 


056 


020443 


000 






2880 020444 


045 


116 


045 


020447 


101 


120 


122 


020452 


117 


107 


122 


020455 


101 


115 


040 


020460 


110 


125 


116 


020463 


107 


054 


040 


020466 


127 


101 


111 


020471 


124 


111 


116 


020474 


107 


040 


106 


020477 


117 


122 


040 


020502 


101 


040 


103 


020505 


117 


116 


124 


020510 


122 


117 


114 


020513 


055 


103 


056 


020516 


040 


074 


052 


020521 


052 


052 


052 


020^24 


052 


052 


052 


020527 


052 


052 


052 


020532 


052 


052 


052 


0205S5 


045 


116 


045 


020540 


116 


000 





En0102:: .ASCIZ /tffMAPROGRAH HUNG. WAITING FQR A CONTROL C. 



2881 .EVEN 



Mb 



286S 






2884 






2885 






2686 






2887 






2888 






2889 






2890 






2891 






2892 






2895 






2894 






2895 






2896 






2897 






2898 






2899 






2900 






2901 






2902 


020542 






020542 


004567 


2903 


020546 


012701 


2904 


020552 


016704 


2905 






2906 


020556 


011402 


2907 


020560 


100016 


2908 






2909 






2910 






2911 






2912 


020562 


012700 


2913 


020566 


040200 


2914 


020570 


001006 


2915 






2916 






2917 






2918 


020572 


012700 


2919 


020576 


040200 


2920 


020600 


001002 


2921 


020602 


004767 


2922 






2923 


020606 


005301 


2924 


020610 


001362 


2925 


020612 


000241 


2926 


020614 


000401 


2927 


020616 


000261 


2928 






2929 


020620 






020620 


004736 


2930 






2951 


020622 


000207 
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PUTIFQ 



- PURGE THE FIFO 

THIS ROUTINE TRIES TO REMOVE ALL THE CHARACTERS FROM THE FIFO. 
ANY BMP CODES THAT ARE FOUND ARE SAVED ON THE BMP CODE QUEUE. 

RBUFA CONTAINS THE ADDRESS OF THE RECEIVER. 

CARRr BIT - INDICATES THE STATE OF THE FIFO, SET;- PURGED. 
BMPCQ - THE CONTENTS OF THE BMP CODE QUEUE MAY BE UPDATED. 



* 

* 
* 

* INPUTS: 
* 
* 

* OUTPUTS: 
* 

* CALLING SEQUENCE: 
* 

* COMMENTS: 
* 

* SUBORDINATE ROUTINES CALLED: SAVBMP. 

****************************************************************************** 



JSR 



PC.PUFIFO 



PUFIFO: :SAVE 

MOV 
MOV 



2$ 

! ♦ 



MOV 
BPL 



jSAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 :CALL REGISTER SAVE SUBRT, 

0512.. Rl ;SET MAXIMUM TRY COUNT OF 512. 

RBUFA, R4 sGET ADDRESS OF THE RECEIVER BUFF«v nrr.I*;TFR, 

CR4),R2 ;GET THE CONTENTS OF THE RECEIVER BUF^£ft REG. 

e% ;EXIT IF THE FIFO IS EMPTY, DATA.VALID CLR. 



CHECK IF THE READ CHARACTER IS ACTUALLY A BMP CODE. 
IF IT IS, THEN SAVE IT ON THE BMP CODE QUEUE TO BE REPORTED LATER. 



MOV 

aic 

BNE 



«70000,R0 

R2,R0 

4» 



GENERATE A BIT MAP Of CHAR ERROR BITS 

WHICH ARE NOT SET FOR CHAR. 
THROW CHAR AWAY IF NOT BMP OR SELFTEST CODE. 



CHECK IF THE READ DATA IS MODEM STATUS . BMP OR SELFTEST?. 



4$: 

6$: 
60«: 



MOV 
BIC 

BNE 

JSR 

DEC 
BNE 

CLC 
BR 
SEC 

PASS 
RTS 



0301.ro 

R2.R0 

4$ 

PC. SAVBMP 

Rl 
2$ 

60S 



JSR 



PC 



; CHECK IF BMP. 

:TRY TO CLEAR BMP FLAGS IN THE READ DATA. 

;IF IT IS MODEM OR SELFTEST CODE THROW IT AWAY. 

I SAVE BMP CODE ON THE QUEUE. 

DECREMENT THE TRY COUNT. 
LOOP TO TRY AGAIN. 

CLEAR CARRY. TO INDICATE FIFO NOT PURGED. 

EXIT WITH CARRY CLEAR. 

SET CARRY. TO INDICATE FIFO PURGED. 

RESTORE GPRS 
PC.aCSP)* ' ; RE TURN TO PREG05 SUBRT, 

CARRY BIT, SET INDICATES FIFO P(^GtD. 



TST PARTI 
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295S 
2954 

2935 
2956 
2937 
2950 
2959 
2940 
2941 
2942 
2945 
2944 
2945 
2946 
2947 
2948 
2949 
2950 
2951 
2952 
2955 
2954 
2955 
2956 
2957 
2958 
2959 
2960 
2961 
2962 
2963 
2964 
2965 
2966 
2967 
2966 
2969 
2970 
2971 
2972 
2973 

2974 
2975 
2976 
2977 
2978 
2979 
2980 
2981 
2982 
2985 
2984 
2985 
2986 
2987 
2968 



020624 

020624 004567 165146 
020650 012767 016416 



020656 005704 
020640 100001 
020642 005102 



020644 005005 



165136 



S8TTL GLOBAL SUBROUTINE RDPDR 

•**********«*****4*****«««**************4*«*** ******************************* 

READ AND VERIFY DATA PATTERN FROM DEVICE REGISTERS ROUTINE 
THIS ROUTINE READS AND VERIFIES THE ROTATED DATA PATTERN UHICM HAS 
BEEN WRITTEN BY THE UDPOR SUBROUTINE. 

EACH ACTIVE LINE'S REGISTER'S CONTENTS IS READ AND COMPARED UITH THE 
WRITTEN DATA. 

AFTER THE UNUSED AND READ ONLY (RO) BITS ARE MASKED OUT. ANY ERRORS ARE 
REPORTED FROM THIS ROUTINE. 

THIS ROUTINE WILL TAKE INTO ACCOUNT THE TYPE OF WRITE OPERATION WHICH 
WAS PERFORMED BY THE WDPDR SUBROUTINE. 



INPUTS! 



R2 - USED TO PASS IN THE DATA PATTERN TO BE ROTATED 6 VERIFIED. 
R5 - BYTE INDICATOR (- "> LO BYTE. ♦ -> HI BYTE. 0 •> BOTH). 
R4 - OPERATION TYPE INDICATOR <■ - •> BIC. ♦ •> BIS. 0 -> MOV). 



ACTLNS 
CSRA - 
DRAORT 
ERCNTB 
ERRMSG 
ERRNBR 
LPRO - 
NUMLNS 
NDERPT 
TXBFCO 
UNBTTB 



BIT MAP OF ACTIVE LINES ON THE DEVICE UNDER TEST. 



CONTAINS THE CSR ADDRESS 

- BASE ADDRESS OF DEVICE 

- LABEL AT BASE OF ERROR 



OF THE DEVICE UNDER TEST. 
REGISTER ADDRESS TABLE. 
COLWTERS TABLE FOR LINES. 

- SET UP WITH THE PROPER ERROR MESSAGE FOR THIS TEST. 

- SET UP WITH THE PROPER ERROR NUMBER. 

EQUATED TO LPR REG OFFSET FROM DEVICE CSR ADDRESS, 

- NUMBER OF LINES ON THE DEVICE UNDER TEST. 

- NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE. 

- EQUATED TO TBUFFCT REG OFFSET FROM DEVICE CSR ADDRESS. 

- BASE ADDRESS OF THE UNUSED BIT TABLE. 



OUTPUTS: 



ERROR MESSAGES MAY BE PRINTED AT THE OPERATOR'S CONSOLE. 
ERCNT - ERROR COUNTERS TABLE IS UPDATED FOR LINE UNDER TEST. 
ERRBLK - CONTENTS DESTROYED. 

ERSMRF - ERROR SUMMARY FLAGS BIT SET IF LINE IN SUMMARY MODE. 
UUT CSR - ALL BITS CLEARED. EXCEPT IND.ADR.REG FIELD DESTROYED. 

CALLING SEQUENCE: JSR PC.ROPOR 

COMMENTS: FOR BYTE ACCESSES. ONLY THE SPECIFIED BYTE IS VERIFIED. 
SUBORDINATE ROUTINES CALLED: ER1601.R0LDAP. 



ROPOR : : SAVE 
MOV 



JSR 

«ER 1601. ERRBLK 



;SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 J CALL REGISTER SAVE SUBRT. 

sSET UP THE ADDRESS OF THE ERROR REPORT RTN. 



J DETERMINE WHETHER REGISTER DATA SHOULD BE INVERTED FROM DATA PATTERN. 

* TST R4 ;C^€CK THE OPERAND TYPE INDICATOR. 

BPL 2» ;BIC WRITE PERFORMED? NO. USE STANDARD DATA. 

COM R2 {YES. INVERT THE DATA PATTERN. 



: SET UP OUTER LOOP. 
2$: CLR R5 



jCLEAR LINE COUNTER TO SELECT LINE 0. 



THE OUTER LOOP FXLOWS. EACH PASS THROUGH THIS LOOP READS AND COMPARES DATA 
FROM ALL OF THE DEVICE REGISTERS FOR A PARTICULAR LINE IF THE LINE IS ACTIVE. 



C70H(J80 OMU 1 1 HJNC TST PHHIl 
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2992 
299$ 

2995 
299t> 
299-' 
299B 
2999 
5000 
5001 

5ooa 
soos 

S004 
5005 
5006 
5007 
5008 
5009 
5010 
5011 
5012 
5015 
5014 
5015 
5016 
5017 
5018 
5019 
5020 
5021 
5022 
5025 
5024 

5025 
5026 
5027 
5028 
5029 
5050 
5051 
5052 
5055 
5054 
5055 
5056 
5057 
5058 
5059 
5040 
5041 
5042 
504 <S 
3044 



020646 

020652 
020656 
020660 
020662 
020670 
02067? 



020676 
020700 
020704 
020710 
020714 
020716 
020720 
020722 
020724 
020726 
020750 
020752 
020756 
020742 
020744 
020746 
020752 

020756 
020762 
020764 
020766 
020772 

020774 
020774 



0207 7*i 
021004 
021006 
021014 

021016 
021020 
021024 
021050 
021054 
021056 
021042 
021046 



01026 7 
010577 
010500 
006500 
056067 
001467 
012703 



010204 
046502 
016900 
005766 
001002 
011001 
000416 
100410 
005200 
111001 
000501 
042701 
042702 
000405 
111001 
042701 
042702 

046501 
020102 
001414 
004767 
105411 



104460 



052767 
001004 
012767 
000425 

010402 
004767 
062705 
020527 
001002 
062705 
020527 
005715 



000222 
161564 



002410 
000004 



002570 
002242 
000010 



4(: 



161540 



MOV 
H0¥ 

nov 

ASL 
BIT 
BCQ 

nov 



R2.70» 
R5.UCSRA 
R5.R0 
RO 

BITTBL(RO).ACTLNS 



I SAVE THE OUTER LOOP DATA PATTERN. 
iSET CSR INO.AOR.REG FIELD TO THIS LINE 



161 
•LPR0.R3 



lis THE LINE ACTIVE? NO. SKIP THE LINE. 
lYES. INITIALIZE REGISTER OFFSET FOR lPR. 



i • 
t 

i 

( - 
61: 



THE INNER LOOP FOLLOWS. EACH PASS THROUGH THIS LOOP READS AND 
DATA FROM A DEVICE REGISTER. 



:OMPA«ES 



8li 



000577 
000577 



177400 
177400 

002570 



177054 



lot: 



12t: 



MOV 
BIC 
MOV 
TST 
BNE 

MOV 
BR 
BMI 
INC 
MOVB 
SUAB 
BIC 
BIC 
BR 
MOVB 
BIC 
BIC 

BIC 

CMP 
BEQ 
JSR 
BCS 
iNO. REPORT 
ERROR 



R2.R4 

UNBTTB(R5).R2 
0RADRT(R3).R0 
R5SL0T(SP) 
8* 

(RO).Rl 
12* 
10* 
RO 

(RO).Rl 
Rl 

•577.R1 
•577.R2 
12* 

CR0),R1 
•177400. Rl 
•1 77400. R2 

UNBTTB(R5).R1 

R1.R2 

141 

PC.CNTERR 
14 < 



iSAVE THE INNER LOOP DATA PATTERN. 
iREMOVE UNUSED BITS FROM EXPECTED DATA. 

I CHECK THE ACCESS TYPE INDICATOR. 

iBYTE ACCESS? YES. GO PERFORM BYTE READ. 

iNO. PERFORM WORD READ OF DEVICE REGISTER. 

iLOU BYTE ACCESS? YES. GO DO LOW BYTE READ. 
I HIGH BYTE ACCESS. FQRM HIGH BYTE ADDRESS. 
iREAD THE HI BYTE OF THE OUT REGISTER. 
iPuT HI Byte BACK INTO THE Hi BvTE. 
iREMOVE THE UNUSED BYTE IN ACTUAL DATA. 
iREMOVE THE UNUSED BYTE IN EXPECTED DATA. 

iREAD THE LOW BYTE OF THE OUT REGISTER. 

iREMOVE THE UNUSED BYTE. 

iFORM EXPECTED LOW BYTE FOR COMAPARISON. 

iREMOVE UNUSED BITS FROM ACTUAL DATA. 
iCOMPARE ACTUAL AND EXPECTED DATA. 
lACTUAL - EXPECTED? VES. SKIP ERROR. 
iNO. COUNT THE ERROR. CHECK FOR ERROR SUMMARY 
tUSE ERROR SUMMARY? YES. SKIP ERROR. 



"BAD BIT(S) IN DEVICE XXXXX REGISTER FQR LINE NN (0). 



000100 
000001 



000444 
000002 
000006 

000002 
000016 



161220 
161270 



IexIT THIS ROUTINE AND SET THE "EXIT ON ERROR 
iRCPORTINC HAS NOT BEEN REQUESTED. 

' BIT «eiT06. OPTION 

BNE 141 

MOV •l.EXOERR 

BR 601 



TRAP 

FLAG. IF EXTENDED ERROR 



C (ERROR 



iMAS EXTENDED ERROR REPORTING BEEN REQUESTED 
iBRANCH IF IT HAS. 
{SET THE EXIT ON ERROR FLAG. 
lEXIT THE ROUTINE. 



141: 



151: 



I ♦ 



MOV R4.R2 iRESTORE THE INNER LOOP DATA PATTERN. 

JSR PC.ROLDAP iROTATE DATA PATTERN LEFT. NOT THROUGH CARRt. 

AOD 92. R5 I SET REGISTER OFFSET TO THE NEXT REGISTER. 

CMP R5.«FSLSD iCHECK THAT THIS IS NOT THE FIFOSIZE 'DATA REG. 

BNE 151 |AVO:0 ALTERING THE OFFSET IF IT ISN T 

ADO •e:.R5 iPOINT AT THE NEXT REGISTER. 

CMP R5.*TXBFC0 iCOMPARE REG OFFSET WITH OFFSET OF LAST RFo. 

BLE 6t iLOOP IF NOT ALL REG DONE FOR THIS LINE. 



J BACK INTO THE OUTER LOOP, NOW 5E T UP f OR NEXT LINE. I OOP IF NOT DOHt 



5045 O^IOSO 016702 

5046 021054 004767 

5047 021060 005205 

5048 021062 020527 
9049 021066 002667 
5050 

5051 021070 
021070 004756 

5052 021072 000207 
5055 

5054 021074 000000 



000020 161 
0004 lO 

000020 

601 
701 
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MOV 
JSR 
INC 
CMP 
8LT 

PASS 

RTS 

.WORD 



70».R2 

PC.ROLOAP 

R5 

R5 1 ^WUMLNS 
41 



PC 

0 



JSR 



I SET UP TO ROTATE THt DATA PATTfRN. 
iROTATE THE DATA PATTERN. 
, COUNT THIS LINE 

iCQMPARE LINE COLMT UITH NUMBER Of LINES. 
iLOOP IF SOME LlNE«i NOT DONE. 



J RESTORE GPRS. 
PC.8( SP)» 



IRETURN TO PREGOS SiJBPT, 



I jIQRAGE pgr data FATTERn C'JTSIDE INNER OOP. 



5056 
5057 
5056 
505«» 
5060 
5061 
5062 
5065 
5064 
5065 
5066 
5067 
5068 
5060 
5070 
5071 
5072 
5075 
5074 
5075 
5076 
5077 
5078 
5079 
5080 
5081 
5082 

5085 
5084 
5085 
5086 
5087 
50o8 
5089 
5090 
5091 
5092 
5095 
5094 
5095 
5096 
5097 
5098 
5099 
5100 
5101 
5102 
5105 
5104 
5105 
5106 
5107 
5108 
5109 
SllO 
5111 
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REGTST 



021076 
021076 



021102 
021106 
021112 
021116 
021120 
021122 



021122 
021124 
021150 
021154 
021156 
021140 
021142 
021150 
021152 
021154 
021156 
021160 
021166 
021170 
021172 



004567 162674 



012705 000020 
012702 167410 
052704 000001 
001001 
005004 



010400 
004767 
016701 
010004 
005404 
005002 
026627 
001401 
005102 
005005 
005000 
026627 
001001 
005100 
004767 



- REGISTERS TEST SUBROUTINE 
SUBROUTINE TO TEST THE DEVICE UNDER TCS' (OUT) REGISTERS. THE USED 
BITS OF THE REGISTERS ARE EITHER ALL CLEARED OR ALL SET AND THEN THE 
DATA PATTERN IS WRITTEN AND VERIFIED USING EITHER WORD OR BrTE 
ACCESSES IN READ/WRITE OR REAO/HODIFv/URITE MODE. 



• INPUTS: 



OUTPUTS: 



R5 BYTE INDICATOR (- ■> LOU, ♦ •> HIGH. 0 -> BOTH BYTES). 
R4 - ACCESS nOOE C 1 -> SET THEN 6IC. 1 -> CLEAR THEN BIS. 

(-2 •> SET THEM MOV. *2 CLEAR THEN MOV). 
ERRNBR SET UP WITH INITIAL ERROR NUMBER. 

GPRSO - GPR SAVE AREA 0 IS DESTROYED. 

DEVICE UNDER TEST REGISTERS ARE WRITTEN. 

ERROR MESSAGES MAY BE PRINTED AT THE OPERATORS CONSOLE, 



CALLING SEQl^NCE: 



JSR 



PC. REGTST 



COMMENTS: THIS ROUTINE LOOP 16 TIMES WRITING THE SAME DATA PATTERN 
ROTATED LEFT ONCE EACH ITERATION. 

THIS ROUTII^ CAN REPORT ERRORS INITIAL ERRNBR THRU INITIAL 'Z. 
SUBORDINATE ROUTINES CALLED: RDPDR.ROLDAP.SWAPO. WOPO<) 



REGTST:: SAVE 



I SAVE CONTENTS OF GPRS RO THRU P5. 
JSR R5.PREG05 tCALL REGISTER SAVE SU6RT . 



I ♦ 

I 
I 



2<: 



SET UP THE GPRS FOR THE WRIT TING OF THE DATA PATTERN. 

MOV •16.. R5 jSET UP LOOP COUNTER TO COUNT 16 ITERATIONS. 

MOV •167410. R2 i INITIALIZE THE DATA PATTERN. 

BIT «BIT0,R4 I TEST FOR R/U ACCESS. 

BNE 2« »R/M/W ACCESS? YES. R4 IS ALL SET UP. 

CLR R4 ,N0. INDICATE R/W ACCESS. 



i » 



SET UP THE GPRS FOR THE CLEARING OR SETTING OF ALL THE USED BITS. 



I - 



001272 
162654 



000012 000002 



000012 
001224 



177776 



4i! 



61: 



MOV R4.R0 

JSR PC.SUAPO 

MOV ERRNBR. Rl 

MOV R0.R4 

NEG R4 

CLR R? 

CMP R4SL0T(SP).#2 

BEQ 4( 

COM R2 

CLR R5 

CLR RO 

CMP R4SL0TCSP).# 2 

BNE 61 

COM RO 

JSR PC.SWAPO 



(PASS OPERATION TtPE INDICATOR AROUND SWAPO. 
iGET ALTERNATE GPR SET IN Rl THRU R5. 
iSAVE THE INITIAL ERROR NUMBER. 

I SET UP OP TYPE FOP CLEARING OR SETTING. 

I SET UP CLEAR WRITE PATTERN. 

J TEST FOR CLEAR THEN MOV TEST SEQUENCE. 

iCLEAR THEN MOV? YES, LEAVE WRITE PAT CLEAR. 

iNO. SET ALL BITS OF WRITE PATTERN. 

{INDICATE THAT WORD ACCESSES SHOULD BE USED. 

iSET ALTERNATE BYTE EXPECTED DATA PAT TO ClEAR. 

I TEST FOR SET THEN MOV TEST SEQUENCE. 

iSET THEN MOV? YES, LEAVE ALT BYTE PAT ClEAR. 

iNO, SET ALT BYTE EXPECTED DATA PAT TO ALL I S. 

I RES TORE SWAPPED GPR VALUES TO Rl THRU R5. 



I START OF DATA PATTERN LOOP. 



CZ0HU80 OHU-ll fUNC TSf PARTI 
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5112 
3115 
5114 
5115 
5116 
5117 
5118 
5119 
51^0 
5121 
5122 
5125 
5124 
5125 
5126 
5127 
5126 
5129 
5150 
5l5t 
5152 
5155 
5154 
5155 
5156 
5157 
5158 
5139 
5140 
5141 
5142 
5145 
5144 
5145 
5146 
5147 
5148 
5149 
5150 
5151 
5152 
5155 
5154 
5155 
5156 
5157 
5158 
5159 
5160 
3161 
5162 
5165 
5164 
5165 
5166 
5167 
5166 



021176 



021176 
021202 
021206 
021212 



021216 
021222 



021250 
021254 
021240 



021244 

021250 

021252 
021254 



021256 
021260 
021262 
021264 
021270 



021274 
021500 

021502 
021504 



021506 
021312 
021314 



MACRO H1200 
REGTST 

t - 
8*: 
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004767 001220 

004767 002156 

010167 162556 

004767 177406 



005767 161062 
001055 



021224 004767 001172 



004767 002110 
005267 162530 
004767 177360 



005767 161034 
001022 



005703 
001414 



010201 
010002 
005405 

005267 162500 
004767 177550 



005767 161004 
001006 

005405 
010102 



004767 000156 

005505 

003350 



!*SET OR CLEAR ALL THE USED BITS OF THE DEVICE REGISTERS FOR ALL LINES, 
s VERIFY THAT ALL THE BITS WERE SET OR CLEARED CORRFCTLT. 

* JSR PC.SWAPO iGET ALTERNATE GPRS FOR SETTING INTIAL STATES. 

JSR PC.UDPDR iGO CLEAR ALL USED REGISTER BITS. ALL LINES. 

MOV Rl.ERRNBR iSET UP ERROR N^ER TO INITIAL ERRNBR. 

JSR PC.ROPDR iVERIFY ALL USED REGISTER BITS. ALL LINES. 

IexIT this routine if an error HAS BEEN FOUND AND EXTENDED ERROR REPORTING 
{HAS BEEN REQUESTED, I.E. EXOERR IS NON ZERO. 

*' TST EXOERR iHAS AN ERROR BEEN FOUND ? 

BNE 60$ jEXIT THIS ROUTINE IF IT HAS. 



JSR 



PC , SUAPO 



jRESTORE MAIN GPRS CONTENTS. 



!*MRITE DATA PATTERNS. ALL LOk'ER BYTE USED BITS, ALL REGISTERS. ALL LINES, 

t VERIFY THAT THE DATA PATTERN WAS WRITTEN CORRECTLY, 

' JSR PC.UDPDR J WRITE DATA PATTERN TO DEVICE REGISTERS. 

INC ERRNBR iSET ERROR NUMBER TO INITIALS. 

JSR PC.ROPDR I VERIFY DATA PATTERN IN ALTERRED ByTE(S). 



i ♦ 



(EXIT THIS ROUTINE IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING 
{HAS BEEN REQUESTED. 



TST 
BNE 

TST 
BEQ 



EXOERR 
60 » 

R5 
10$ 



iHAS AN ERROR BEEN FOUND ? 
I EXIT THIS ROUTINE IF IT HAS. 

J CHECK THE BYTE INDICATOR. 

J WORD ACCESS? YES. SKIP SECOND B^TE CHECK. 



J CHECK THAT THE ALTERNATE (UNMODIFIED! BYTE IS CLEAR OR SET AS EXPECTED. 



NOV 
MOV 
NEG 
INC 
JSR 



R2.R1 
R0.R2 
R5 

ERRNBR 
PC.ROPDR 



J SAVE THE DATA PATTERN. 

jGET THE ALTERNATE BYTE EXPECTED DATA. 

{INDICATE THAT OTHER BYTE IS TO BE CHECKED. 

iSET ERROR NUMBER TO INITIAL*2. 

jVERIFY DATA PATS IN OTHER BYTES OF REGISTERS. 



> ♦ 



J EXIT THIS ROUTINE IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING 
(HAS BEEN REQUESTED. 



TST 
BNE 

NEG 
MOV 



EXOERR 
60* 

R5 

R1.R2 



I HAS AN ERROR BEEN FOUND ? 
jEXIT THIS ROUTINE IF IT HAS. 

(RESTORE BYTE INDICATOR. 
(RESTORE DATA PATTERN. 



( ♦ 



10) ! 



( PEPARE THE NEXT DATA PATTERN AND LOOP IF NOT DONE. 

JSR PC.ROLDAP (ROTATE DATA PATTERN LEFT. NOT THROUGH CARRv 

DEC R5 (COUNT THIS ITERATION OF THE LOOP. 

BGT 8$ (ALL PATTERNS DONE? NO, LOOP. 



I- / 

516<) J YES, RESTORE ERROR MUMBER AND EXIT. 

3170 021516 016767 161126 162444 60>: HOV GPRSOB . ERRNBR ;GET THE ERROR NUMBR FROM GPR SWAP STORAGE. 

SI 'I 021S24 PASS I RESTORE GPRS. 

021324 004736 JSR PC.8(SP)» jRETiJRN TO PRfeGOS SUBRT, 

S172 021326 000207 RTS PC 



TST PARTI 



MACRO N1200 
REPSMR 



15 MAR 84 09:15 



PAGE 66 



3174 




3175 




3176 




3177 




317S 




5179 




5100 




31S1 




5162 




3183 




3184 




3185 




3186 




3187 




3188 




3189 




3190 




3191 




3192 




3193 




3194 




5195 




3196 




3197 




3198 




3199 




3200 


021330 




021330 


3201 


021334 


3202 


021340 


3203 




3204 




3205 




3206 


021342 


3207 




3208 




3209 




3210 




3211 


021350 




021350 


3212 




3213 


021352 




021352 


3214 


021354 



.SBTTL GLOBAL SUBR0OTIf4E 

;** ********************* 

!* 

:♦ 

!* 
; * 



REPSMR 



REPORT ERROR SUMMARY ROUTINE 
THIS SUBR0UTIf4E REPORTS AN ERROR SUMMARY FOR THOSE i INES UHICH HAVE 
EXCEEDED <HE NUMBER OF INDIVIDUAL ERRORS TO REPORT FOR A SINGLE LINE 
IN A SINCi,E TEST. THIS PARAMETER CAN BE SPECIFIED BY TMF OPERATOR IF 
HE/SHE AN<.)UERS THE SOFTWARE PARAMETER QUESTIONS. 



INPUTS: 



ERCNTB LABEL AT BASE OF LINE ERROR COUNTERS TABLE. 

ERRMSG - ADDRESS OF PRIMARY ERROR MESSAGE. 

ERRNBR - ERROR NUMBER OF ERRORS IN THIS ROUTINE. 

ERSMRF - "REPORT ERROR SUMMARY FOR LINE FLAGS, 



OUTPUTS: ERRBLK ADDRESS OF ERROR REPORTING ROUTINE (DESTKOfED). 

SUMMARY MESSAGES MAY BE PRINTED AT THE OPERATOR CONSOLE. 



CM.LING SEQUENCE: 
COMMENTS: 



JSR 



PC. REPSMR 



IF NO LINES HAVE EXCEEDED THE MAXIMUM NUMBER OF INDIVIDUAL 
ERRORS TO REPORT. NO MESSAGES ARE PRINTED BY THIS ROUTINE. 
ERROR SUMMARIES IN THIS ROUTINE ARE REPORTED AS ERRORS. 
THE CONTENTS OF ERRBLK ARE DESTROYED. 



SUBORDINATE ROUTINES CALLED: 



REPSMR:: SAVE 

TST 
BEQ 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 sCALL REGISTER SAVE SUBRT. 

ERSMRF : CHECK THE "PRINT LINE ERROR SUMMARY" FLAGS. 

60$ iEXIT UITHOUT ACTION IF NO SUMMARY FLAGS SET. 



162424 



s ^€ HAVE SOME ERROR SUMMARIES TO REPORT. 

* MOV «ER9004. ERRBLK j SELECT ERROR REPORTING ROUTINE. 

I REPORT 

t "ERROR SUMMARY REPORT FOR LINES WITH EXCESSIVE NUMBERS OF ERRORS: 



60*: 



ERROR 

PASS 
RTS 



PC 



: RESTORE GPRS. 
JSR PC.a(SP)» 



TRAP CtERROR 
{RETURN TO PREG05 SUBRT. 



TST PARTI riAl 
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'.EO 



5^16 
5^17 
3210 
3219 
5220 
3221 
3222 
3223 
3224 
3225 
3226 
3227 
3228 
3229 
3230 
3231 
3232 
3233 
3234 
3235 
3236 
3237 
3238 
3239 
3240 
3241 

3242 
3243 
3244 
3245 
3246 
3247 
3246 
3249 
3250 
3251 
3252 
3253 
3254 
3255 
3256 
3257 
3258 
3259 
3260 
3261 
3262 
3263 
3264 
3265 
3266 
3267 
3268 
3269 
3270 
3271 



021356 
021356 
021362 



021366 
021372 
021374 
021376 
021400 
021404 
021410 



004567 162414 
012702 000040 



016704 160650 
030214 
001406 
005003 

012701 011610 
004767 176554 
103012 



021412 
021416 



021422 
021424 
021430 
021434 



010277 160624 
004767 000722 



005003 

012701 011610 
004 767 176530 
103410 



SBTTL GLOBAL SUBROUTINE 



RESET T 



- RESET DEVICE UNDER TEST 
THIS SUBROUTINE IS USED TO RESET THE OUT TO A KNOWN STATE. 
IF RESET DOES NOT SUCCESFULLY COMPLETE, IE. TIME-OUT OCCURS, 
AN ABORT TEST ERROR MESSAGE IS REPORTED. 



THEN 



INPUTS: 



CSRA ■ 
TXBFCA 
ERRTBL 



CONTAINS THE ADDRESS OF THE CSR 

- CONTAINS ADDRESS OF DUT DMA BUFFER COUNT REGISTER. 
ERRTYP.ERNBR.ANO ERRMSG SET UP CORRECTLY. 



THE DUT PERFORMS ITS RESET FUNCTION INTO A KNOWN STATE. 



* 
* 

* 

* 
* 
* 
* 
* 

* OUTPUTS: 
* 
* 
* 
* 
* 

* CALLING SEQUENCE: 
* 

* COMMENTS: THIS SUBROUTINE CAN REPORT ERRORS WITH NUMBERS INITIAL ERRNBR 

* THIS ROUTINE DOES NOT DESTROY THE VALUE OF ERRNBR. 

* SUBORDINATE ROUTINES CALLED: DELAY .MSLGET . 



CARRY 
ERRBLK 
lESTAT 



CLEAR INDICATES THE TEST IS TO BE ABORTED. 
VALUE MAY BE DESTROYED. 
TX AND RX INTERRUPT FLAGS ARE CLEARED. 



TX AND RX INTERRUPT ENABLE BITS IN THE DUT'S CSR ARE CLEARED. 
JSR PCRESETT 



RESETT:: SAVE 



MOV 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 ;CALL REGISTER SAVE SUBRT 

•eiT05,R2 iSET BIT MASK OF MASTER RESET BIT. 



{ ♦ 



TEST THE STATE OF THE MASTER RESET BIT IN THE CSR. 
IF MR IS StT THEN WAIT FOR SELF TEST TO COMPLETE. 
IF TIME-OUT OCCURS. REPORT THE ERROR AND PASS OUT ABORT TEST INDICATOR. 



t - 



MOV CSRA,R4 i GET THE ADDRESS OF THE DUT'S CSR. 

BIT R2.(R4) :CHECK STATE OF MASTER RESET BIT. 

BEO 2» lOONT DELAi IF MR IS ALREADY CLEAR. 

CLR R3 sSET UP DESIRED STATE OF MASTER RESET BIT. 

MOV #5000.. Rl iPASS TIME-OUT VALUE OF 5 SECONDS. 

JSR PC. MSLGET iWAIT FOR SELF-TEST TO COMPLETE. MR CLEAR. 

BCC 4» I GO REPORT ERROR IF TIMEOUT OCCURRED. 

SET MASTER RESET BIT IN CSR. CLEAR TX AND RX ENABLE BITS. ETC. 
SKIP THE SELFTEST. 

TIME-OUT OF 5 SECS. JUST IN CASE THE SELF-TEST EXECUTES. 

2t: MOV R2.aCSRA iSET MASTER RESET BIT. DISABLE TX AND RX INTS. 

JSR PC.SKPSTS I TRY TO SKIP THE SELFTEST. 

SET SELF TEST TIME-OUT OF 5 SECONDS. AND WAIT FOR M.R TO CLEAR. 
IF TIME-OUT OCCURS. THEN REPORT THE FATAL ERROR AND PASS-OUT THE ABORT 
TEST INDICATOR. 



CLR 
MOV 

JSR 

BCS 



R3 

•5000.. Rl 
PC. MSLGET 
6$ 



iSET UP DESIRED STATE OF MASTER RESET BIT. 
(PASS TIME-OUT VALUE OF 5 SECONDS. 
iWAIT FOR SELF TEST TO COMPLETE. MR CLEAR. 
iSKiP ERROR REPORT IF MR CLEARED IN TIME. 



IbT PARI I MACRi 
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5^72 
5^75 
5274 
5275 
5276 
5277 
5278 
5279 
5280 

5281 
5282 
5285 
5284 
5285 
^296 
5287 
5288 
5289 
5290 

5291 
5292 
5293 



021456 
021442 



021450 
021450 
021452 
021454 



021456 
021462 

021464 
021464 

021466 



012701 012221 
012767 016526 



104460 

000241 
000405 



005067 160626 
000261 



004756 
000207 



162524 



t SET UP ERROR MESSAGE TO REPORT "FATAL ERROR FOUND DURING RESET, TEST ABORTED 
I INDICATE TEST IS TO BE ABORTED BY CLEARING THE CARRY BIT. 



t 

4$: 



MOV »EM1601.R1 jPASS ERROR MESSAGE TO REPORT. 

MOV •ER1603.ERR8LK sPASS ADDRESS OF ERROR HANDLING ROUTINE. 

;REPORT ERROR "TIME OUT OCCURRED WAITING FOR MASTER RESET TO CLEAR' 
J "TEST ABORTED" 

ERROR ; >>>>> ERROR <<<<< 

TRAP Ct ERROR 

CLC ; INDICATE TEST IS TO BE ABORTED. 

BR 601 ;EXIT THIS SUBROUTINE. ABORT TEST INDICATOR. 

CLEAR TX AND RX INTERRUPT ENABLE STATUS FLAGS IN lESTAT, 
EXIT WITH CONTINUE TEST INDICATOR SET (IE. CARRY SLT^ 



6«: 

60$: 



CLR 
SEC 

PASS 
RTS 



lESTAT 



PC 



JSR 



jCLEAR TX AND RX INTERRUPT STATUS FLAGS. 
: INDICATE SUCCESS. CONTINUE TEST. 

{RESTORE GPRS. PASS THE FOLLOWING INTACT: 
PC.aCSP)* : RE TURN TO PREG05 SU6RT, 

, CARRY BIT:IF CLEAR . INDICATES ABORT TEST. 



S2<>S 
5299 
3300 
3301 
3302 
3^05 
3304 
3305 
3306 
3307 
3308 
3309 
3310 
3311 
3312 
3313 
3314 

3515 
5516 
5517 
5518 
5319 



5320 
5521 
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0214 70 

0214 70 004567 162502 

021474 005702 

021476 100001 

021500 000261 

021502 006102 
021504 

021504 010266 000006 

021510 004756 

021512 000207 



ROLOAP 



- ROTATE LEFT DATA PATTERN 

THIS ROUTINE ROTATES THE PASSED INPUT DATA PATTERN LEFT. WITHOUT GOING 
THROUGH THE CARRY. THE CARRY IS INITIALLY SET OR CLEARED DEPENDING 
UPON THE STATE OF THE MSB OF THE DATA PAT TERN. BEFORE A ROL INSTRUCTION 
IS EXECUTED. 

CONTAINS THE DATA PATTERN TO BE ROTATED 
CONTAINS THE ROTATED DATA PATTERN 
JSR PC.ROLDAP 



* 
* 

• INPUTS: R2 
* 

♦ OUTPUTS: R2 

'* CALLING SEQUENCE: 
* 

♦ COMMENTS: 

* SUBORDINATE ROUTINES CALLED: NONE 



ROLDAP : : SAVE 

TST R2 

BPL 2» 

SEC 

21: ROL R2 

60* : PASS R2 



RTS PC 



JSR 



MOV 
JSR 



J SAVE CONTENTS OF GPRS RO THRO R5. 

R5.PREG05 sCALL REGISTER SAVE SUBRT. 

jCHECK MSB, AND CLEAR CARRt . 

J BRANCH IF CLEAR, 

iSET CARRY IF MSB SET 

;ROTATE DATA PATTERN LEFT 

jRESTORE GPRS. EXCEPT 

R2.R2SL0T(SP) sPuT R2 IN STACK SLOT. 

PC.aCSP). s RE TURN TO PREG05 SUBRT. 

:R2 - CONTAINS THE ROTATED DATA PATTERN 



TST PARTI 



RSTRPi 
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5523 
3524 
3525 
3326 
3327 
3528 
3529 
5530 
3551 
3552 
5355 
3554 
3335 
3336 
3357 
3336 
3539 
3540 
3341 
3342 
3343 
3344 
5345 
3346 
354 7 
3548 
5349 
3350 
3351 
3352 

3353 
3554 
3355 
3356 
3357 
3356 
3359 
3360 
3361 
3362 
3363 
3364 
3365 
3366 
3367 
3368 
3369 
3570 
5371 

3572 
5373 
3374 
5375 
3576 
5377 



021514 
021514 



021520 
021522 
021526 
021552 



021554 
021540 
021544 



021552 
021552 



021554 
021562 
021564 



004567 162256 



005005 

016705 162242 
017702 160512 
100422 



010567 162230 
012701 015127 
012767 017056 



104460 



032767 OOOlOO 
001003 

012767 00000 I 
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RSTRPI 



8» 



REPORT ANY RESET ERRORS ROUTINE 
THIS ROUTINE DETERMINES IF ANY ERROR COOES ARE AMONG THE DIAGNOSTIC 
CODES REPORTED PLACED IN THE OUT RECEIVED CHARACTER FIFO BY THE 
SELF TEST. IF ANY NON BMP ERROR CODES ARE FOUND, OR IF OTHER ERRORS 
ARE ENCOUNTERED. APPROPRIATE ERRORS ARE REPORTED. ANY BMP COOES THAT 
ARE FOUND. ARE PLACED ON THE BMP CODE QUEUE TO BE REPORTED LATER. 
THIS ROUTINE ALSO PURGES THE DUT FIFO LOOKING FOR ANY CHARACTERS 
OR MODEM STATUS COOES. IF ANY ARE FOUND, ERRORS ARE REPORTED. 



♦ INPUTS: 



* 
* 



OUTPUTS: 



ERRMSG ADDRESS OF THE PRIMARY ERROR MESSAGE. 

ERRNBR ERROR NUMBER OF FIRST ERROR REPORTED Bv THIS R0«JITNE. 

NUMLNS EQUATED TO THE NUMBER OF LINE ON THE OUT. 

RBUFA CONTAINS ADDRESS OF THE OUT RECEIVER FIFO. 

CARRY - SUCCESS FLAG (SET IF FIFO CLEARED SUCCESSFULLY). 
ERRBLK ADDRESS OF THE ERROR REPORT ROUTINE (DESTROYED). 
ERROR MESSAGES CAN BE PRINTED AT THE OPERATORS CONSOLE. 



CALLING SEQUENCE: 



JSR 



PC.RSTRPT 



COMMENTS: THIS SUBROUTINE CAN REPORT ERRORS WITH NUMBERS INITIAL ERPNBR 
THRU INITIAL ERRNBR ^4. 

THIS ROUTINE DOES NOT DESTROY THE VALUE OF ERRNBR. 
SUBORDINATE ROUTINES CALLED: ER05O3.ER9O07.ER9OO8.SAVBMP . 



RSTRPT:: SAVE 



JSR 



sSAVE CONTENTS Jf GPRS RO THRU R5. 
R5.PREG05 :CALL REGISTER SAVE SUBRT 



READ CORRECT NUMBER (NUMBER OF LINE ON OUT) OF CHARS FROM THE FIFO. 
VERIFY THAT EACH CHAR IS A SELFTEST SUCCESS CODE. 



2$: 



CLR 
MOV 
MOV 
BMI 



R3 

ERRNBR. R5 
aRBUFA.R2 
4$ 



CLEAR THE CODE COUNTER. 

SAVE ERRNBR FOR RESTORATION LATER. 

READ A CHAR FROM THE OUT FIFO. 

SKIP ERROR IF DATA. VALID SET FOR CHAR. 



WE EXPECT A SELFTEST CODE. BUT THIS FIFO SLOT IS EMPTY. 



I - 



162222 



MOV R5, ERRNBR 
MOV ♦EM9018,RI 
MOV *ER9007, ERRBLK 



(RESTORE ERROR NUMBER TO INTITIAL VALUE. 
(PASS ERROR MESSAGE INFO TO ER9007 ROUTINE. 
I SELECT PROPER ERROR REPORT ROUTINE. 



REPORT ERROR WITH NUMBER INITIAL ERRNRB. 

NO SELFTEST CODE IN SELFTEST CODE FIFO SLOT FOR LINE NN AFTER RESET. 



ERROR 



>>>*> ERROR <<< 



TRAP C»ERRCR 

EXIT THIS ROUTINE IF EXTENDED ERROR REPORTING HAS NOT BEEN REQUESTED. 



160442 
160512 



BIT «6IT06, OPTION 
BNE 1% 
MOV «1,EX0ERR 



|HAS EXTENDED ERROR REPORTING BEEN REQUESTED 
! AVOID SET THE FLAG IF IT MAS. 
:SET THE EXIT ON ERROR FLAG 



CZOMUBO Ohy . 
GLOBAl SifROU 



11 rtxc 
TINE 



TST PARTI MAgR^^MpOO 



3578 








33 79 








3300 








5381 


(21572 


000261 




5382 


C 21574 


000167 


000406 


3383 








3384 








3385 








3386 


')21600 


012700 


070001 


3387 


(121604 


040200 




3388 


0?1606 


001042 




3389 








3S90 








3391 








3392 








3S93 


021610 


052702 


000200 


3394 


0216^4 


001462 




5S9S 


02161S 


120227 


000205 


3596 


02162^ 


001457 




5397 


021624 


120227 


000201 


5596 


021650 


001454 




5599 


021652 


012700 


000500 


5400 


02165«^ 


040200 




5401 


021640 


001005 




5402 


021642 


004767 


000450 


5405 


C21646 


000445 




5404 








A40S 








5406 








5407 


021650 


010567 


162114 


5406 


021654 


005267 


162110 


5409 


021660 


012701 


015154 


5410 


021664 


012767 


017126 


5411 








5412 








5413 








5414 








541S 


021672 
021672 


104460 




5416 








5417 








5416 








5419 


021674 


052767 


000100 


5420 


021702 


001027 




5421 








5422 


021704 


012767 


000001 


5425 


021712 


000554 




5424 








5425 








5426 








5427 








3426 


021714 


010567 


162050 


5429 


021720 


062767 


000002 


5450 


021726 


012701 


015157 


5451 


021752 


012767 


017036 


5432 








5455 









5« 



4$ 



6$ 



162102 



160322 
160572 



162042 
162034 



L I 
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INIOICATE 'SUCCESS" (BECAUSE FIFO IS PURGED). AND EXIT THIS ROUTINE. 



SEC 
JMP 



60S 



I SET SUCCESS FLAG. 
sEXIT ROUTINE. 



DETERMINE IF THIS IS NOT A SELFTEST CODE, 

NOV «70001.R0 (GENERATE BIT MAP OF ANY CLEAR ERROR BITS OR 

BIC R2.R0 : BIT 0 WHICH ARE CLEAR. 

BNE 8$ iGO TO REPORT ERROR IF THIS IS NOT A TEST CODE, 

*UE HAVE A TEST CODE (EITHER BMP OR SELFTEST CODE). 
DETERMINE WHAT TYPE OF CODE WE HAVE. 



BIT 
BEQ 

CMPB 
BEQ 

CMPB 
BEQ 

MOV 

BIC 
BNE 
JSR 
BR 



*BIT7.R2 
10* 

R2.#203 
10» 

R2.#201 
10* 

«300.RO 

R2.R0 

6« 

PC.SAVBMP 
10 » 



:TEST ROM VERSION CODE INDICATOR BIT. 
{SKIP ERRORS IF SELFTEST ROM VERSION CODE. 
! CHECK IF SKIP SELF TEST CODE. 

sSKIP FRROR REPORT IF SKIP SELF TEST CODE FOUND 

: CHECK IF NULL CODE PRESENT. 

jSKIP ERROR REPORT IF SELF TEST NULL CODE. 

TEST CODE TYPE BITS FOR BOTH CODE 

TYPE BITS SET (INDICATING BMP CODE). 

IF IT IS NOT A BMP CODE GO REPORT ERROR. 

SAVE THE BMP CODE ON THE QUEUE. 
;G0 GET THE NEXT CHARACTER FROM THE FIFO. 



J WE HAVE A SELFTEST ERROR CODE. 



MOV R5.ERRNBR 

INC ERRN6R 

MOV «EM9020.R1 

MOV «ER9008 , ERRBLK 



{RESTORE ERROR NUMBER TO INTITIAL VALUE. 
tCALCULATE INITIAL ERROR NUMBER PLUS 1. 
:PASS ERROR MESSAGE INFO TO ER9006 ROUTINE. 
{SELECT PROPER ERROR REPORT ROUTINE. 



> ♦ 



t REPORT ERROR WITH NUMBER INITIAL ERRNRB » 1. 
; "UNEXPECTED SELFTEST ERROR CODE FOR \.\\4L NN IN »^IFO AFTER RESET: 



ERROR 



> > > > > ERROR <<<<<, 

TRAP CiERROR 



EXIT THIS ROUTirC IF EXTENDED ERROR REPORTING HAS NOT BEEN REQUESTED. 



BIT «8IT06, OPTION 

BNE 10 ( 

MOV «1.EX0ERR 

BR 50 > 



(HAS EXTENDED ERROR REPORTING BEEN REQUESTED ? 

J AVOID SET THE FLAG IF IT HAS AND GO TO 

iTHE END OF THE LOOP. 

tSET THE "EXIT ON ERROR" FLAG 

jEXlT THE ROUTINE WITH FAILURE SINCE THE FIFO 

J IS NOT PRUGED. 



I * 



WE HAVE A NON-SELFTEST CODE (EITHER BMP CODE OR DATA CHAR), 

MOV R5,ERRNBR {RESTORE ERROR NUMBER TO INTITIAL VALUE. 

ADD «2.ERRNBR {CALCULATE INITIAL ERROR NLWBER PLUS 2. 

MOV •EM9019.R1 {PASS ERROR MESSAGE INFO TO ER9007 ROUTINf 

MOV •ER900 7, ERRBLK {SELECT PROPER ERROR REPORT ROUTINE. 



{ REPORT ERROR WITH NUMBEP INITIAL ERRNRB • 2. 



CZ0HU80 OMU U ruNC TST PARTI MACRO M1200 
GLOBAt S18R0UTINE RSTRPT 

























OP \ 740 


















54 3 A 




















S440 


02\ 742 


032767 


000100 


160254 


S44 1 




001004 
















3443 


021752 


012767 


OOOOOl 


160324 


3444 


A2 1 7ftO 








344 S 










3446 










344 7 










3448 










3449 


021762 


005203 






34^0 


021764 


020327 


000010 




S451 


021770 


002656 






34S2 










3453 










3454 










3455 


021772 


012704 


000022 




3456 


021776 


010567 


161766 




3457 


022002 


062767 


000003 


161760 


345A 


022C10 


012767 


017126 

VA * 


161756 


3459 


022016 


017702 


160222 




3460 


022022 


000261 






3461 


022024 


100070 






3462 










3463 










3464 










3465 












022026 


0127OO 


070000 




3467 


022032 


040200 






3468 


022034 


001403 






3469 










3470 










3471 










3472 


022036 


012701 


015200 




3473 


022042 


000423 






3474 










3475 










3476 










3477 










3478 


022044 


032702 


OOOOOl 




3479 


022050 


001003 






3480 










3481 










3482 










3483 


022052 


012701 


015217 




3484 


022056 


000415 






3485 










3486 










3487 










3486 










3489 


022060 


032702 


000200 
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-NON SELriEST CODE IN SELFTEST CODE FIFO SLOT FOR LINE NN AFTER RESET. 

ERROR } >>>>> ERROR <<<<<. 

TRAP CiERROR 

IeXIT this routine if extended ERROR REPORTING HAS NOT BEEN REQUESTED. 



BIT ffBIT06. OPTION 

BNE 10$ 

HOV «1.EX0ERR 

BR 50$ 



(HAS EXTENDED ERROR REPORiING BEEN REQUESTED ? 

I AVOID SET THE FLAG IF IT HAS AND GO TO 

sTHE END OF THE LOOP. 

:SET THE "EXIT ON ERROR" FLAG 

sEXiT THE ROUTINE WITH FAILURE. 



s END 0 LOOP. LOOP IF NOT ALL CHARS HAVE BEEN READ FROM THE FIFO. 



10$: 



INC 
CMP 
BLT 



R3 

R3.«8. 
2$ 



jSET CODE COUNTER FOR NEXT ITERATION OF LOOP. 

(TEST FOR ALL COOES READ. 

sLOOP IF NOT CHARS READ FROM FIFO, 



PURGE THE FIFO UNTIL DATA. VALID IS CLEAR OR UNTIL TOO MANY CHARS ARE READ. 



12$: 



MOV 
MOV 
ADD 
MOV 
MOV 
SEC 
BPL 



«18.,R4 

R5.ERRNBR 

«3.ERRNBR 

«ER9008.ERRBLK 

aRBUFA,R2 

60$ 



INITIALIZE THE CHARACTER COUNTER. 
GET INITIAL VALUE OF THE ERROR NUMBER. 
CALCULATE ERROR NUMBER OF NEXT ERROR, 
s SELECT PROPER ERROR REPORT ROUTINE. 
READ A CHARACTER FROM THE OUT FIFO. 
INDICATE SUCCESS IN CASE DATA. VALID IS CLEAR. 
EXIT ROUTINE WITH SUCCESS IF DATA. VALID CLEAR. 



UE HAVE A CHARACTER. 

DETERMINE IF CHARACTER IS A DATA CHARACTER. 



MOV 
SIC 
BEG 



•70000.ro 

R2.ro 

14$ 



TEST BITS 1? THRU 14 OF THE 

CODE READ FROM THE OUT FIFO. 
SKIP THIS ERROR IF CODE IS NOT A DATA CHAR. 



UE HAVE AN UNEXPECTED DATA CHARACTER: SET UP AND GO TO REPORT ERROR. 

MOV #EM9022,Rl s SELECT ERROR MSG INFO FOR ER0808 ROUTINE. 

BR 22$ iGO TO REPORT THIS ERROR. 

'i*UE HAVE AN UNEXPECTED CODE. 

I DETERMINE IF THE CODE IS A MODEM STATUS CODE. 



14$: 



BIT 
BNE 



«6IT0.R2 
16$ 



J TEST MODEM STATUS INDICATOR BIT OF CODE. 
;SKIP THIS ERROR IF NOT MODEM STATUS CODE. 



UE HAVE A MODEM STATUS CODE: SET UP AND GO TO REPORT ERROR. 

MOV #EM9023,R1 -.SELECT ERROR MSG INFO FOR ER0808 ROUTINE, 

BR 22$ iGQ TO REPORT THIS ERROR. 



! ♦ 



t UE HAVE AN ONBOARD TEST CODE. 
; DETERMINE IF THIS CODE IS A BMP CODE. 



16$; 



BIT 



•BIT7,R2 



J TEST THE ROM VERSION BIT OF THE CODE. 



CZ0MU80 DHU 11 TST PARTI 

GLOeAL S18R0UTINE 



3490 


022064 


001404 


3491 


022066 


012700 


3492 


022072 


040200 


5493 


022074 


001403 


5494 






5495 






5496 






5497 


022076 


012701 


3498 


022102 


000403 


3499 






3500 






3501 






3502 


022104 


004 76 7 


3503 


022110 


000411 


3504 






3505 






3506 






3507 






3508 


022112 






022112 


104460 


3509 






3510 






5511 






3512 


022114 


032767 


5513 


022122 


001004 


3514 






3515 


022124 


012767 


3516 


022132 


000424 


3517 






3518 






3519 






3520 






3521 






3522 


022134 


005304 


3523 


022136 


001327 


3524 






3525 






3526 






3527 






3528 






3529 


022140 


012701 


3530 


022144 


010567 


3531 


022150 


062767 


3532 


022156 


012767 


3533 






3534 


022164 






022164 


104460 


3535 






3536 






3537 






3538 


022166 


032767 


3539 


1 "Til 
Ode 1 f 4 


/NAf AAV 

001003 


3540 


022176 


012767 


3541 






3542 


022204 


000241 


3543 






3544 


022206 





015016 
161620 
000004 
016136 



000100 
000001 
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- RSTRPT 



15 HAR 84 09:15 



H7 

PAGE 69 3 



BEQ 
MOV 
BIC 

BEQ 



18$ 

«300.RO 

R2.R0 

201 



{GOTO SET UP FOR SELF TEST CODE IF ROM VERSION, 

;TEST THE ERROR TYPE BITS OF THE CODE. 
;SKIP THIS ERROR IF BMP CODE. 



: ♦ 



160102 
160152 



161612 
161610 



160030 
160100 



18$: 



20»: 



22): 



UE HAVE A SELFTEST CODE: SET UP AND GO TO REPORT ERROR. 

MOV #EM9024.R1 j SELECT ERROR MSG INFO FOR ER0808 ROUTINE. 

BR 22* sGO TO REPORT THIS ERROR. 

'uE HAVE A BMP CODE: SAVE IT ON THE QUEUE. 



JSR 
BR 



PC . SAVBMP 
24 « 



;SAVE THE BMP CODE ON THE QUEUE. 

■ 

REPORT THE ERROR WITH ERROR NUMBER OF INITIAL ERRNBR ♦ 3. 
"UNEXPECTED XXX XXXX FOR LINE NN IN FIFO AFTER RESET:" 

ERROR I > > > > > ERROR <<<<<. 

TRAP C »ERROR 

EXIT THIS ROUTINE IF EXTENDED ERROR REPORTING HAS NOT BEEN REQUESTED. 



t - 



BIT «BIT06. OPTION 

BNE 24$ 

MOV Ol.EXOERR 

BR 50* 



HAS EXTENDED ERROR REPORTING BEEN REQUESTED 

AVOID SETTING THE FLAG IF IT HAS AND GO TO 

THE END OF THE LOOP. 

SET THE "EXIT ON ERROR" FLAG 

EXIT THE ROUTINE WITH FAILURE. 



241: 



END OF LOOP. 

COUNT THE CHARACTER UE JUST RECEIVED. AND CHECK FOR TOO MANY RECEIVED. 



DEC 
BNE 



R4 
12» 



! COUNT THIS CHARACTER. 

•.LOOP IF NOT TOO MANY CHARACTERS PURGED. 



; UE READ TOO MANY VALID CHARACTERS WHILE TRYING TO PURGE THE FIFO. 
; REPORT ERROR AND EXIT WITHOUT SUCCESS. 

S "FIFO WILL NOT PURGE (DAT A. VALID STUCK SET). REMAINDER OF TEST SKIPPED. 



MOV 0EM9017.R1 
MOV R5. ERRNBR 
ADO «4. ERRNBR 
MOV OER0503.ERR8LK 

;PRINT ERROR REPORT. 

ERROR 



: SELECT PROPER ERROR MESSAGE. 
{GET INITIAL ERROR NUMBER. 
jCALCULATE INITIAL ERRNBR ♦ 4. 
.-SELECT PROPER ERROR REPORT ROUTINE. 

5 > > > > > ERROR <<<<<. 

TRAP 



C TERROR 

'exit THIS ROUTINE IF EXTENDED ERROR REPORTING HAS NOT BEEN REQUESTED. 



50J ! 
60$ : 



BIT 
BNE 
MOV 

CLC 

PASS 



06IT06. OPTION 
50$ 

♦l.EXOERR 



:HAS \ XTENDED ERROR REPORTING BEEN REQUESTED ? 
jAVOlJ SETTING THE FLAG IF IT HAS. 
:SET THE "EXIT ON ERROR' FLAG 

; CLEAR THE SUCCESS FLAG. 

; RE ST ORE GPRS. 



B8 



cjDHceo OHu 11 f\.HC TsT PARTI HACRO m^oo 

GlOeAi. SI ((ROUTINE RSTRPT 



004756 

000^07 



IS HAR fM 09: i5 PAGE 69 4 

JSR PC.fi(SP)> iRETURN TO PREGOS SUBRT. 

RTS PC I CARRf SUCCESS FLAG (SET IF f IFQ IS PURGED K 



5547 
S546 

554'» 
S550 
5551 
S552 
555S 
5554 
5555 
5550 
555T 
5550 
5559 
5560 
5561 
5562 
5565 
3564 
3565 
5566 



3567 



5568 
5569 
5570 



5571 
5572 



022212 
022P14 
022214 
022216 
022220 
022220 
022224 
022226 
022254 
022242 
022242 
022244 
022246 
022250 
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010046 

104440 
010046 

012700 000540 
104441 

042767 157777 
016777 160050 

012600 
104441 

012600 
000207 



RXIEO 



160054 
160000 



RECEIVER INTERRUPT DISABLE - 
THIS ROUTINE IS USED TO DISABLE RECEIVER INTERRUPTS IN THE DMUll. 

NONE. 

THE RX.INT.ENBL BIT IS CLEARED IN THE OUT CSR. 

lESTST -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 
ENABLE BITS. 



• INPUTS: 

• OUTPUTS: 
* 
* 
* 

• CALLING SEQUENCE 
* 

• COMMENTS: THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD IN 

• THE DUT CSR ARE DESTROrED. 

• SUBORDINATE ROUTINES CALLED: NONE. 



JSR 



PC. RXIEO 



RXIEO:: MOV RO.-(SP} 
GETPRI -CSP) 



SETPRI APR 10 7 



BIC #157777, lESTAT 
MOV lESTAT.SCSRA 
SETPRI CSP)» 



MOV 

RTS 



CSP)».RO 
PC 



(SAVE CONTENTS OF RO ON THE STACK. 

iSAVE PROCESSOR PRIORITY ON STACK. 

TRAP CtGPRI 
MOV RO. (SP) 

(IGNORE ANY INTERRUPT THAT HAT BE GENERATED. 

MOV «PRI07.R0 
TRAP C*SPRI 

t CLEAR RX.INT.ENBL BIT IN lESTAT. 

(DISABLE RX INTERRUPTS. 

(ENABLE INTERRUPTS TO THE PROCESSOR AGAIN. 

MOV (SP)».R0 
TRAP CtSPRI 

(RESTORE RO. 



<;Ea 95 



D8 



TST PARTI 
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3574 
35^5 
35 '6 
3577 
3578 
5579 
3580 
3581 
3582 
3583 
3584 
3585 
3586 
5587 
5588 
3589 
3590 
5591 
3592 

5595 022252 052767 
5594 022260 042767 

3595 022266 016777 

3596 022274 000207 



000100 160030 
137677 160022 
160016 157746 
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RXIEl 



* RECEIVER INTERRUPT ENABLE 

* THIS ROUTINE 13 USED TO ENABLE RECEIVER INTERRUPTS IN THE OHiJll. 

* INPUTS: NONE. 
* 

* OUTPUTS: 
* 

* 

* CALLING SEQUENCE; 
• 

* COMMENTS: THE CONTENTS Of THE INDIRECT ADDRESS REGISTER FIELD IN 

* THE DUT CSR ARE DESTROYED. 
* 

* SUBORDINATE ROUTINES CALLED; NONE. 



THE RX.INT.ENBL BIT IS SET IN THE DuT CSR. 

lESTST -CONTAINS THE UPDATED STATUS OF THE TX AND Rx INTERRUPT 
ENABLE BITS. 



JSR 



PC. RXIEl 



RXIEl:: BIS «6IT06. lESTAT 

BIC ♦137677, lESTAT 

MOV lESTAT.SCSRA 

RTS PC 



I SET RX.INT.ENBL BIT IN lESTAT. 

iCLEAR ALL OTHER BITS. EXCEPT TX AND RX I.E. 

I ENABLE RX INTERRUPTS. 



1ST PARTI MAI 
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5596 
3599 
it>00 
3601 
3602 
3603 
3604 
3605 
3606 
360? 
3600 
3609 
3610 
5611 
3612 
3613 
3614 
3615 
3616 
3617 
S61S 
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SAVBMP 



- SAVE BMP COOES ROUTINE 
THIS ROUTINE SAVES THE PARAMETER PASSED IN. ONTO THE BMP CODE QUEUE 
TOGETHER UITH THE NUMBER OF THE CURRENTLt EXECUTING TEST. 

INPUTS: R2 - CONTAINS THE BMP CODE THAT IS TO BE PLACED ON THE QUEUE. 

BMPCQP CONTAINS ADDRESS OF NEXT LOCATION IN THE BMP QUEUE. 
BMPCQB - LABEL AT BASE OF THE BMP CODE QUEUE. 

BMPCQE - LABEL OF NEXT LOCATION AFTER THE END OF THE BMP QUEUE. 
TSTNUM - CONTAINS THE NUMBER OF THE CURRENT TEST. 

OUTPUTS: BMPCQP - INCREMENTED BY 4. 

THE CONTENTS OF THE BMP CODE QUEUE ARE UPDATED. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC, SAVBMP 



IF THE OVERFLOW OCCURS THEN THE LAST LOCATION WILL BE 
OVERWRITTEN BY ANY SUBSEQUENT ATTEMPTS TO UPDATE THE QUEUE. 



SUBORDINATE ROUTINES CALLED: NONE. 



3619 












3620 












3621 


022276 






SAVBMP:: SAVE 






022276 


004567 


161474 




JSR 


3622 


022302 


016704 


160216 


MOV 


BMPCQP. R4 


3623 


022306 


116724 


160012 


HOVB 


TSTNUM. (R4)» 


3624 


022312 


005204 




INC 


R4 


3625 


022514 


042702 


177400 


BIC 


•177400. R2 


3626 


022320 


010224 




MOV 


R2.(R4). 


5627 


022322 


020427 


002726 


CMP 


R4.«BMPCQE 


3626 


022326 


103402 




BLO 


2$ 


5629 


022550 


162704 


000004 


SUB 


•4,R4 


5630 


022354 


010467 


160164 


2»: MOV 


R4. BMPCQP 


3651 










3632 


022340 
022340 


004736 




60t : PASS 


JSR 


5633 


022542 


000207 




RTS 


PC 



sSAVE CONTENTS OF GPRS RO THRU R5. 

R5.PREG05 J CALL REGISTER SAVE SUBRT. 

iGET THE POINTER TO THE NEXT LOCATION IN QUEUE. 

J SAVE THE CURRENT TEST NUMBER ON THE QUEUE. 

s INCREMENT THE POINTER TO GIVE AN EVEN ADDRESS. 

jCLEAR THE UNWANTED BITS FROM THE BMP CODE. 

tSAVE THE BMP CODE ON THE QUEUE. 

s CHECK IF OVERFLOW WILL OCCUR THE NEXT TIME. 

I GO SAVE THE POINTER IF WE WILL NOT OVERFLOW. 

jRESET THE POINTER TO THE LAST LOCATION IN QUE. 

jSAVE THE POINTER. 



J RESTORE GPRS. 
PC.9( SP)» 



;RETURN TO PREG05 SUBRT. 
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3635 






3636 






3637 






3630 






3639 






3640 






3641 






3642 






3643 






3644 






3645 






3646 






3647 






3648 






3649 






3650 






5651 






3652 






3653 






3654 






3655 


022344 






022344 


004567 


3656 


022350 


012704 


3657 


022354 


004767 


3658 






3659 






3660 






3661 


022360 


012701 


3662 






3663 






3664 


022364 


012703 


3665 


022370 


005301 


3666 


022372 


016704 


3667 


022376 


010124 


3668 


022400 


010324 


3669 


022402 


020467 


3670 


022406 


103774 


3671 


022410 


032701 


3o72 


022414 


001365 


5673 






3674 


022416 






022416 


004736 


5675 


022420 


000207 



161426 
000012 
175544 



000060 

052525 
157644 

157652 
000017 



.SBTTL GLOBAL SUBROUTINE 
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- SKIP SEL TEST ROUTINE - 
THIS SUBROUTINE IS USED TO SKIP THE SELFTEST AFTER A OUT RESET MAS BEEN 
INITIATED. IT MUST BE ENTERED IMMEDIATELY AFTER SETTING THE DUT MASTER 
RESET RQUTIKiE OR AFTER THE EXECUTION OF A BUS RESET C BECAUSE OF TIMING 
CONSIDERATIONS). 

INPUTS: CSRA - CONTAINS ADDRESS OF THE DUT CSR. 

TXBFCA CONTAINS ADDRESS OF DUT DMA BUFFER COUNT REGISTER. 

OUTPUTS: SKIP SELFTEST CODES ARE WRITTEN TO THE DUT REGISTERS. 

CALLING SEQUENCE: JSR PC. SKPSTS 

COMMENTS: 

SUBORDINATE ROUTINES CALLED: DELAY. 



SKPSTS:: SAVE 

MOV 
JSR 



J SAVE CONTENTS OF GPRS RO THRU R5, 
JSR R5.PREG05 iCALL REGISTER SAVE SUBRT. 

010.. R4 iPASS DELAY VALUE OF 10 MILLI -SECONDS. 

PC. DEL AY i DELAY FOR 10 MILLI -SECONDS. 



t 

I - 



WRITE SKIP SELF -TEST CODE C 52525) TO ALL THE INDEXED OUT REGISTERS. 

MOV •NUMLNS5BIT05.R1 jFORM INO.ADR.REG FIELD (PLUS M.R. BIT) WORD. 
I THE ABOVE INCLUSION OF THE M.R. BIT IS NECESSARY BECAUSE OF THE 
I LACK OF A M.R. BIT WRITE LOCK-OUT ON THE OHU-11. 



4(: 

6$: 

601: 



MOV 


#52525. R3 


INITIALISE THE SKIP SELF-TEST CODE. 


DEC 


Rl 


» SELECT THE NEXT SET OF DEVICE REGISTERS. 


MOV 


CSRA.R4 


jGET THE ADDRESS OF THE CSR OF THE OUT. 


MOV 


R1.(R4)» 


J SELECT A BANK OF OUT REGISTERS, 


MOV 


R5,CR4)» 


tWRITE THE CODE TO A DUT REGISTER. 


CMP 


R4. TXBFCA 


jCOMPARE POINTER WITH LAST REGISTER ADDRESS. 


BLO 


6$ 


J LOOP IF NOT ALL REGS DONE IN THIS BANK. 


BIT 


•17, Rl 


J TEST FOR INO.ADR.REG FIELD DECREMENTED TO 0. 


BNE 


4$ 


(LOOP UNTIL ALL REGISTERS CONTAIN THE CODE. 


PASS 




t RESTORE GPRS. 




JSR 


PC, a(SP)» .'RETURN TO PREG05 SL6RT 


RTS 


PC 
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5677 

3676 

5679 

3600 

3681 

5662 

3683 

3684 

3685 

3686 

3687 

3688 

3689 

3690 

3691 

5692 

5693 

3694 

5695 

3696 

3697 

3698 

3699 

3700 

5701 

5702 

5703 

3704 

5705 

5706 

5707 

5708 

5709 

5710 

5711 

5712 

5715 

5714 

5715 

5716 

5717 

5718 

5719 

5720 

5721 

5722 

3725 

5724 

5725 

5726 

5727 

5728 



022422 010046 



022424 
022426 
022450 
0224S2 
022434 



022456 
022442 
022444 
022446 
022450 
022452 



022454 
022456 
022460 
022462 
022464 



010146 
010246 
010346 
010446 
010546 



012700 002450 
012001 



012002 
012005 
012004 
012005 



012640 
012640 
012640 
012640 
012640 



022466 012600 
022470 000207 
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SWAP GPRS WITH GPR SET 0 ROUTINE • 
THIS SUBROUTINE SUAPS THE PRESENT CONTENTS OF GPRS Rl THRU R5 WITH 
THE CONTENTS OF THE NUMBER ZERO GPR SAVE AREA. THE CONTENTS OF RO 
ARE NOT ALTERED BY THIS SUBROUTINE. ^ v 

INPUTS: GPR CONTENTS Rl THRU R5. 

GPRSOB LABEL AT BASE OF GPR SAVE AREA NUMBER ZERO. 

OUTPUTS: Rl THRU R5 CONTAIN THE PREVIOUS CONTENTS OF GPR SAVE AREA 

ZERO UORDS 1 THRU 5 RESPECTIVELY. 
GPRSO GPR SAVE AREA 0 WORDS I THRU 5, CONTAIN PREVIOUS 
CONTENTS OF GPRS Rl THRU R5 RESPECTIVELY. 

CALLING SEQUENCE: JSR PC.SUAPO 

COMMENTS: THE STATE OF THE CARRY FLAG IS NOT ALTERRED BY THIS ROUTINE, 
SUBORDINATE ROUTINES CALLED: NONE. 



MOV 



RO.-CSP) 



SUAPO: : 

I LOAD THE STACK FROM THE GPRS. 



MOV 
MOV 
MOV 
MOV 
MOV 



Rl.-CSP) 
R2.-(SP) 
R3.-(SP) 
R4.-(SP) 
RS.-CSP) 



iSAVE THE CONTENTS OF RO. 



J SAVE THE CONTENTS OF Rl. 

J SAVE THE CONTENTS OF R2. 

I SAVE THE CONTENTS OF R3. 

iSAVE THE CONTENTS OF R4. 

I SAVE THE CONTENTS OF R5. 



I LOAD THE GPRS FROM THE GPR SAVE AREA 0. 
i - 

MOV •GPRSOB. RO iGET THE BASE ADDRESS OF GPR SAVE AREA 0. 

MOV (R0)».R1 iLOAD Rl WITH GPR SAVE AREA 0 WORD 1, 

MOV (R0)*,R2 iLOAD Rl WITH GPR SAVE 

MOV (R0)».R3 iLOAD Rl WITH GPR SAVE 

MOV (R0)».R4 {LOAD Rl WITH GPR SAVE 

MOV (R0)..R5 iLOAD Rl WITH GPR SAVE 



AREA 0 WORD 2. 
AREA 0 WORD 3. 
AREA 0 WORD 4. 
AREA 0 WORD 5. 



; LOAD THE GPR SAVE AREA 0 FROM THE STACK. 



MOV 
MOV 
MOV 
MOV 
MOV 



CSP).. 
(SP)*. 
(SP)*. 
(SP5». 
CSP)». 



(RO) 
-(RO) 
(RO) 
(RO) 
(RO) 



{LOAD GPR 

I LOAD GPR 

(LOAD GPR SAVE 

iLOAD GPR SAVE 

tLOAO GPR SAVE 



SAVE AREA 0 WORD 5 WITH SAVED RS. 
SAVE AREA 0 WORD 4 WITH SAVED R4. 
AREA O WORD 3 WITH SAVED R3. 
AREA 0 WORD 2 WITH SAVED R2. 
AREA 0 WORD 1 WITH SAVED Rl. 



MOV (SP)».RO 
RTS PC 



I RESTORE THE INITIAL VALUE OF RO. 



200 15 -MAR 84 09:15 PAGE 



lb 
75 



5 '50 
3751 
5752 
3755 
S734 
3755 
3756 
5757 
3758 
3759 
5740 
5741 
5742 
5745 
5744 
5745 
5746 
5747 
5748 
5749 
5750 
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TSABRT 



TEST ABORT ROUTINE - 
THIS SUBROUTINE IS USED WHEN A NON TEST RELATED ERROR HAS BEEN rOUNO 
DURING THE EXECUTION OF THE CURRENT TEST. 

IT IS USED TO INFORM THti OPERATOR THAT THE CURRENT TEST HAS BEEN 
ABORTED. 

INPUTS: ERRMSG - CONTAINS THE NAME OF THE CURRENT TEST. 

ERRNBR - CONTAINS THE CORRECT ERROR NUMBER. 

THE REMAINDER OF THE ERRTBL IS CORRECTLY INITIALISED. 

OUTPUTS: MESSAGES ARE REPORTED TO THE OPERATOR. 

CALLING SEQUENCE: JSR PC, TSABRT 

COMMENTS: 

SUBORDINATE ROUTINES CALLED: ER1603. 



5751 


0224 72 
022472 


004567 


161300 




TSABRT: 


; SAVE 


5752 


0224 76 


012701 


022514 






MOV 




02c90e 


012 rO/ 


OloseO 






nuv 


5754 


022510 
022510 


104460 








ERROR 


5755 


022512 


000432 








BR 


3756 


022514 


040 


116 


117 


2$: 


.ASCIZ 




022517 


116 


055 


122 








022522 


105 


114 


101 








022525 


124 


105 


104 








022550 


040 


124 


105 








022553 


125 


124 


040 








022556 


105 


122 


122 








022541 


117 


122 


040 








022544 


106 


117 


125 








022547 


116 


104 


040 








022552 


104 


125 


122 








022555 


111 


116 


107 








022560 


040 


124 


105 








022565 


125 


124 


040 








022566 


105 


150 


105 








022571 


103 


125 


124 








022574 


111 


117 


116 








022577 


000 










5757 










.EVEN 




5758 


022600 
022600 


004756 






60»: 


PASS 


5759 


022602 


000207 








RTS 



JSR 

«2*.R1 

«ER1603,ERRBLK 



60* 



J SAVE CONTENTS OF GPRS RO THRU R5. 
R5,PREG05 ;CALL REGISTER SAVE SU6RT. 

{PASS ADDRESS OF FIRST MESSAGE TO BE REPORTED. 
J SET -UP THE ERROR REPORTING ROUTINE. 
. > > > > > ERROR <<<<<. 

TRAP C SERRQR 



/ NON -RELATED TEST ERROR FOUND DURING TEST EXECUTION/ 



PC 



J RE STORE GPRS. 
JSR PC.S(SP)» 



{RETURN TO PREG05 SUBRr, 
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5 7bl 






3762 






3763 






3764 






5765 






5766 






576' 






5 768 






5769 






3770 






5771 






5772 






5775 






5774 






5775 






3776 






3777 






3778 






5779 






5780 






5781 






5782 






5785 






5784 


022604 






022604 


004567 


5785 


022610 


010500 


5786 


022612 


012701 


5787 


022616 


016702 


5788 


022622 


005202 


5789 


022624 


012703 


5790 


022630 


016704 


5791 


022634 


005005 


5792 






5795 






3794 






5795 


022636 


010477 


5796 


022642 


105712 


5797 


022644 


100001 


5798 


022646 


050105 


5799 






3800 






3801 






5802 






3803 


022650 


030100 


5804 


022652 


001402 


5805 


022654 


142712 


3806 


022660 


005204 


5807 


022662 


006301 


5808 


022664 


005305 


5809 


022666 


001363 


5810 






5811 


022670 






022670 


010566 




022674 


004736 


3812 






3813 


022676 


OOC207 



161166 

000001 
157434 

000020 
157454 



157400 



000200 



000014 
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i ♦ • 
* 

* 

J* 
* 

* 

* 
* 
* 

* 

* 
* 



TRANSMITTER DISABLE 
THIS SUBROUTINE IS USED TO DISABLE TRANSMISSION ON SELECTED LINES B<. 
CLEARING THE ASSOCIATED Tx. ENABLE BIT ON THE OUT. 

INPUTS: R5 BIT'S SET CORRESPOND TO LINES ON WHICH TO CLEAR TA. ENABLE. 

CSRA CONTAINS THE ADDRESS Of THE DUT CSR. 

lESTAT CONTAINS THE STATE OF TXIE AND RXIE BITS IN THE CSR. 
NLIMLNS EQUATED TO BE THE MAXIMUM NUMBER OF LINES AVAILABLE. 
TXAD2A CONTAINS THE ADDRESS OF THE TBUFFA02 REGISTER. 

OUTPUTS: R5 - BIT'S SET INDICATE THE INITIAL STATES OF ALL TX.ENBLE BITS. 

TBUFFA02 THE STATE OF THE TX.ENBLE BIT MAf BE ALTERED. 
THE CONTENTS OF THE IND.ADD.REG FIELD IN THE CSR ARE OESTROvEO. 



CALLING SEQUENCE: 
COMMENTS: 



JSR 



PC. TXOSBL 



SUBORDINATE ROUTINES CALLED: NONE. 



TXOSBL:: SAVE 

MOV 
MOV 
MOV 
INC 
MOV 
MOV 
CLR 

i ♦ 



J SAVE CONTENTS OF GPRS RO THRU R5. 

JSR R5,PREG05 ;CALL REGISTER SAVE SU8RT. 

R5.R0 sCOPY BIT MAP OF LINES TO DISABLE TRANSMISSION. 

•BITO.Rl I INITIALIZE THE SELECTED LINE BIT MASK, 

TXAD2A.R2 iGET THE ADDRESS OF THE TBUFFAD2 REGISTER. 

R2 jGET THE ADDRESS OF THE MSBtTE OF TBUFFA02 REG, 

•HUMLNS.R3 jGET MAXIMUM LINE NUMBER PLUS ONE. 

IESTAT.R4 iGET THE STATES OF THE INT ENABLE BITS. 

R5 ;LOG POSSIBLE TX DISABLED ON ALL LINES. 



J SELECT EVERY LINE IN TURN. AND LOG THE STATE OF EACH TX. ENABLE BIT. 



2$: 

s ♦ 
i 
t 

4S: 

61: 

60S: 



MOV R4.aCSRA 

TSTB (R2) 

BPL 4$ 

BIS R1.R5 



lURITE TO DUT CSR TO SELECT LINE REGISTERS. 
sCHECK STATE OF TX. ENABLE BIT ON SELECTED LINE, 
iSKIP NEXT INSTRUCTION IF Tx. ENABLE CLEAR. 
:LOG TX ENABLE BIT SET FOR SELECTED LINE. 



CLEAR TX.ENBLE ON LINES THAT HAVE A CORRESPONDING BIT SET IN THE TX DISAB.-E 
LINE BIT MAP. 



BIT 

BEQ 
BICB 
INC 
ASL 
DEC 

BNE 

PASS 



RTS 



Rl.RO J CHECK STATE OF DISABLE LINE BIT MAP. 

6t iBRANCH IF THIS LINE TO REMAIN UNALTERED. 

»BIT7.(R2) ;CLEAR TX, ENABLE BIT ON SELECTED LINE. 

R4 jPREPARE TO SELECT REGISTERS FOR NEXT LINE. 

Rl : SHIFT BIT MAP FOR NEXT LINE. 

R5 J DECREMENT LINE NUMBER. 

2» jLOOP TO CHECK NEXT LINE. 

iRESTORE GPRS. EXCEPT 
MOV R5.R5SL0TCSP) ;PUT R5 IN STACK SLC^. 

JSR PC.aCSP)* ; RE TURN TO PREG05 ScW 

iR5 PREVIOUS STATES OF ALL Tx. ENABLE BIT^. 



R5 



PC 



TST PftRTl 



MACRO H1200 
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5615 
3016 
3ai7 
5810 
5019 
50^0 
3021 
5822 
3025 
5024 
5825 
5«2fe 
5027 
5020 
3029 
5050 
5051 
5052 
5055 
5054 
3035 
5036 
3037 
5030 

5039 
3040 
3041 
5042 
3643 
5844 
3845 
5846 
584 7 
3848 
5849 
5850 
5851 
5852 
5855 
5854 
5855 
5856 
5857 
3858 
5859 
5860 
5861 
5862 
5865 
5864 
3865 



3866 
3867 
5868 



022700 
022700 
022704 
022706 
022712 
022716 
022720 
022724 
022730 



022732 
022736 
022740 
022742 



022744 
022746 
022750 
022754 
022756 
022760 
022762 

022764 
022764 
022770 



004567 
010500 
012701 
016702 
005202 
012703 
016704 
005005 



010477 
105712 
100401 
050105 



050100 
001402 
152712 
005204 
006301 
005305 
001363 



010566 
004736 



161072 

000001 
157540 

000020 
157360 



157304 



000200 



000014 



.SBTTL 



GLOBAL SUBROUTINE 



TXENBL 



TRANSMITTER ENABLE 
THIS SUBROUTINE IS USED TO ENABLE TRANSMISSION ON SELECTED LINES Br 
SETTING THE ASSOCIATED TX. ENABLE BIT ON THE OUT. 



INPUTS! 



OUTPUTS: 



R5 BITS SET CORRESPOND TO LINES ON WHICH TO SET Tx. ENABLE. 
CSRA - CONTAINS THE ADDRESS Of THE DUT CSR. 

lESTAT - CONTAINS THE STATE Of TXIE AND RXIE BITS IN THE CSR. 
NUIiLNS EQUATED TO BE THE MAXIMUM NUMBER OF LINES AVAILABLE. 
TXA02A CONTAINS THE ADDRESS OF THE TBUFFAD2 REGISTER, 

R5 BIT'S SET INDICATE PREVIOUSLY DISABLED LINES. 
TBUFFAD2 - THE STATE OF THE TX.ENBLE BIT MAY BE ALTERED. 
THE CONTENTS OF THE IND.ADD.REG FIELD IN THE CSR ARE DESTROYED. 



• 

J* 
I* 
t* 
I* 
* 
* 
* 
* 

t* COMMENTS: 
* SUBORDINATE ROUTINES CALLED: NONE. 



CALLING SEQUENCE: 



JSR 



PC. TXENBL 



TXENBL:: SAVE 

MOV 
MOV 
MOV 
INC 
MOV 
MOV 
CLR 



iSAVE CONTENTS OF GPRS RO THRU R5. 

JSR R5.PREG05 ;CALL REGISTER SAVE SUBRT. 

R5,R0 :C0PY BIT MAP OF LINES TO ENABLE. 

•BITO.Rl INITIALIZE THE SELECTED LINE BIT MASK. 

TXAD2A.R2 ;GET THE ADDRESS OF THE TBUFFA02 REGISTER. 

R2 J GET THE ADDRESS OF THE MSBYTE OF TBUFFA02 REG. 

«NUMLNS.R3 :GET MAXIMUM LINE NUMBER. 

IESTAT.R4 sGET THE STATES OF THE INT ENABLE BITS. 

R5 ;CLEAR TX. ENABLE BIT LOG OF DISABLED LINES. 



i ♦ 



SELECT EVERY LINE IN TURN. AND LOG ANY TX.ENBLE BIT THAT IS CLEAR. 



i - 
2<: 



MOV R4,9CSRA 

TSTB (R2> 

BMI 4S 

BIS R1.R5 



; WRITE TO DUT CSR TO SELECT LINE REGISTERS. 
;CHECK STATE OF TX.ENTOLE BIT ON SELECTED LINE. 
iSKIP NEXT INSTRUCTION IF TX. ENABLE SET. 
:LOG rx ENABLE BIT CLEAR FOR SELECTED LINE. 



SET TX.ENBLE ON LINES THAT HAVE A CORRESPONDING BIT SET IN THE TX ENABLE 
LINE BIT MAP. 



i - 
4f i 



61: 



60* : 



022772 000207 



BIT 

BEG 
6IS8 
INC 
ASL 
DEC 

6NE 

PASS 



RTS 



Rl.RO jCHECK STATE OF TX. ENABLE LINE BIT MAP. 

6* iBRANCH IF THIS LINE TO REMAIN UNALTERED. 

06IT7.(R2) jENABLE TRANSMISSION ON SELECTED LINE. 

R4 jPREPARE TO SELECT REGISTERS FOR NEXT LINE. 

Rl .-SHIFT BIT MAP FOR NEXT LINE. 

R5 I DECREMENT LINE NUMBER. 

2$ iLOOP TO CHECK NEXT LINE. 

R5 {RESTORE GPRS. EXCEPT 

MOV R5.R5SL0T(SP) sPUT R5 IN STACK SLOT. 

JSR PC.8(SP)» : RE TURN TO PREG05 Sl«R' 

jR5 LINE BIT MAP CORRESPONDING TO THE 
1 PREVIOUS LINES THAT WERE DISABLED. 

PC 



JNC TST PARTI 



MACRO Ml 200 
TXIEO 
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<^E0 101 



5870 
3871 
38 V 
S8:5 
3874 
S875 
38 '6 
5877 
3878 
3879 
5880 
3881 
3882 
3885 
5884 
3885 
3886 
3887 
3888 
3889 



.SBTTL GLOeAL SUBROUTINE 



TXIEO 



3890 



3891 
3892 
3893 



3894 

3895 



022774 010046 
022776 

022776 104440 

023000 010046 
023002 

023002 012700 000340 

023006 104441 

023010 042767 177677 157272 

023016 016777 157266 157216 
023024 

023024 012600 

023026 104441 

023030 012600 

025032 000207 



TRANSMITTER INTERRUPT DISABLE 
THIS ROUTINE IS USED TO DISABLE TRANSMITTER INTERRUPTS IN THE OHUll. 

NONE. 

THE TX.INT.ENBL BIT IS CLEARED IN THE OUT CSR. 
lESTST -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 
ENABLE BITS. 



* 

J* 

* INPUTS: 
* 

* OUTPUTS: 
* 
* 
* 

* CALLING SEQUENCE 
i* 

;* COMMENTS: THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD IN 
;* THE OUT CSR ARE DESTROYED. 

* 

* SUBORDINATE ROUTINES CALLED: NONE. 



JSR 



PC. TXIEO 



TXIEO: 



MOV 
GETPRI 



RO,-(SP) 
-(SP) 



SETPRI •PRI07 



BIC #177677. lESTAT 
MOV lESTAT.aCSRA 
SETPRI (SP)» 



MOV 

RTS 



(^)».R0 
PC 



•.SAVE CONTENTS OF RO ON THE STACK. 

{SAVE CURRENT PROCESSOR PRIORITY ON THE STACK. 

TRAP C$GPRI 
MOV RO.-CSP) 

: IGNORE ANY INTERRUPTS THAT MAY BE GENERATED. 

MOV «PRI07.R0 
TRAP CtSPRI 

: CLEAR TX.INT.ENBL BIT IN lESTAT. 

(DISABLE TX INTERRUPTS. 

(ENABLE INTERRUPTS TO THE PROCESSOR AGAIN. 

MOV (SP)».RO 
TRAP CtSPRI 

(RESTORE RO. 



4 



CZ0HU80 DMU 11 fUNC TST PARTI 
GLOBAL S18R0UTINE 



5897 
38<)8 
3894 
S900 
5901 
590a 
5905 
5904 
5905 
5906 
5907 
5908 
5909 
5910 
5911 
5912 
5915 
5914 
5915 
5916 
5917 
5916 
5919 



025054 052767 040000 

025042 042767 157677 

025050 016777 157254 

023056 000207 



L8 
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<>E0 lOi 



157246 
157240 
157164 



- TXIEl 



TRANSMITTER INTERRUPT ENABLE 
THIS ROUTINE IS USED TO ENABLE TRANSMITTER INTERRUPTS IN THE DMUll, 



NONE. 

THE TX.INT.EN8L BIT IS SET IN THE OUT CSR. 

lESTST -CONTAINS THE UPDATED STATUS OF THE TX AND RX INTERRUPT 
ENABLE BITS. 



!* 

!• INPUTS: 

!* 

I* OUTPUTS: 

J* 
;* 

i* CALLING SEQUENCE: 
s* 

i* COMMENTS: THE CONTENTS OF THE INDIRECT ADDRESS REGISTER FIELD IN 
:* THE OUT CSR ARE DESTROYED. 

* SUBORDINATE ROUTINES CALLED: NONE. 

- - *«4> ******************************************************* «************•••* 



JSR 



PC. TXIEl 



TXIEl:: BIS •BIT14 , lESTAT 

BIC #137677. lESTAT 

MOV lESTAT.aCSRA 

RTS PC 



»SET TX.INT.ENBL BIT IN lESTAT. 
;CLEAR ALL BITS EXCEPT TX RX I,E BITS. 
: ENABLE TX INTERRUPTS. 



TST f>ARTl 



MACRO M1200 
UNSDIV 
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'^Q 103 



5921 
3922 
3923 
3924 
3925 
3926 
3927 
3926 
3929 
3930 
3931 
3932 
3933 
3934 
3935 
3936 
3937 
3936 
3939 
3940 
5941 
3942 
3943 
3944 

3945 
3946 
3947 
3946 
3949 
3950 
3951 
3952 
3953 
3954 
3955 
3956 
3957 
3956 
3959 
3960 
3961 
3962 
3963 
3964 
3965 
3966 
3967 
3966 
3969 
3970 
3971 
3972 
3973 
3974 
3975 
3976 



023060 

023060 004567 160712 



023064 010204 

023066 160104 

023070 103403 

*23072 012701 177777 

023076 000442 



023100 005004 

023102 000241 

023104 006001 

023106 006004 

023110 012700 000020 



023114 010246 

023116 010346 

023120 160403 

023122 005602 

023124 103402 

023126 160102 

023130 103003 



023132 012603 
023134 012602 



.SBTTL GLOBAL SUBROUTINE 



- UNSDIV 



- UNSIGNED DIVIDE ROUTINE - 
THIS SUBROUTINE IS USED TO DIVIDE A 32 BIT UNSIGNED DIVIDEND BY A 
16 BIT UNSIGNED DIVISOR GIVING A 16 BIT QUOTIENT. ALL NUMBERS ARE 
CONSIDERED TO BE UNSIGNED. A SUCCESS FLAG IS NOT SET ON RETURN IF 
THE QUOTIENT WAS TOO BIG TO BE CONTAINED IN 16 BITS. 



* 

* 
* 
* 

• INPUTS: 
* 

• OUTPUTS: 
* 
* 

* CALLING SEQUENCE: 
* 

* COMMENTS: IF THE DIVISOR IS 0 THE QUOTIENT IS RETURNED AS ALL ONES 

• (177777) AND THE CARRY IS CLEAR REGARDLESS OF THE DIVIDEND. 
* 

* SUBORDINATE ROUTINES CALLED: NONE. 

- *************************************************************************** 



Rl THE DIVISOR. UNSIGNED. 16 BITS. 

R2 - HOST SIGNIFICANT WORD OF THE DIVIDEND. UNSIGNED. 16 BITS. 
R3 - LEAST SIGNIFICANT WORD OF THE DIVIDEND. iJNSIGNED. 16 BITS. 

Rl QUOTIENT. UNSIGNED. 16 BITS (177777 IF OVERFLOW). 

CARRY - SUCCESS FLAG. SET IF COMPLETE QUOTIENT FITS IN 16 BITS. 



JSR 



PC. UNSDIV 



UNSDIV:: SAVE 



sSAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 sCALL REGISTER SAVE SUBRT. 



CHECK FOR QUOTIENT GREATER THAN 16 BITS CONDITION. 



MOV 
SUB 
BCS 
MOV 
BR 



R2.R4 
RI.R4 
2$ 

•-1.R1 
60$ 



:GET MSU OF DIVIDEND FOR SUBTRACT. 

{SUBTRACT DIVISOR FROM MSU OF DIVIDEND. 

lIF IT DIDN'T GO. UE HAVE QUOTIENT < 16 BITS. 

;SET QUOTIENT TO ALL ONES (177777). 

:EXIT WITH CARRY CLEAR. 



t ♦ 



i - 
2$: 



SET UP COUNTERS AND VARIOUS WORKING GPRS 
R4 



CLR 
CLC 
ROR Rl 
ROR R4 
MOV «16..R0 



THE SUBTRACT AND SHIFT LOOP. 



I - 
4$: 



MOV 
MOV 
SUB 
SBC 
BCS 
SUB 
BCC 



R2. (SP) 

R3.-(SP) 

R4.R3 

R2 

6$ 

R1.R2 
6$ 



: CLEAR THE LSW OF THE DIVISOR. 
tCLEAR CARRY FOR THE SHIFT OF THE DIVISOR. 
: DIVISOR BY 
t 2( UNSIGNED) 

J SET UP INITIAL SHIFT COUNT TO 16. 



I SAVE MSUORD OF DIVIDEND. 

iSAVE LSUORD OF DIVIDEND. 

tLSUORO DIVIDEND • LSUORD OF DIVISOR. 

t MSUORD DIVIDEND - BORROU . 

tIF BORROU FROM BORROU SUBTRACT. IT DION' T GO. 
iMSUORD DIVIDEND - MSUORD OF DIVISOR. 
ilF NO BORROU. IT UENT. CARRY IS CLEAR. 



; IT DIDN'T GO, SO WE SHIFT A I INTO THE QUOTIENT (COMPLEMENTED LATER). 
CARRY IS SET. 



6$: 



MOV 
MOV 



(SP)».R3 
(SP)».R2 



(RESTORE LSUORD OF DIVIDEND. 
(RESTORE MSUORD OF DIVIDEND. 



TST PARTI 



3977 


023136 


000401 


3978 






3979 






3980 






3981 






3962 


023140 


012626 


3983 






3984 






3985 






3986 


023142 


006105 


3987 


023144 


000241 


3988 


023146 


006001 


3989 


023150 


006004 


3990 


023152 


005300 


3991 


023154 


001357 


3992 


023156 


005105 


3993 






3994 






3995 






3996 


023160 


000241 


3997 


023162 


006103 


3998 


023164 


103402 


3999 


0P3166 


160403 


4000 


023170 


103403 


4001 






4002 






4003 






4004 


023172 


005205 


4005 


023174 


001001 


4006 


023176 


005305 


4007 






4008 






4009 






4010 


023200 


010501 


4011 


02S202 


000261 


4012 






4013 


023204 






023204 


010166 




023210 


004736 


4014 






4015 


023212 


000207 
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BR 



10$ 



-.GOTO SHin 1 INTO THE QUOTIENT, 



IT WENT. SO UE RESTORE THE STACK AND SHIFT A 0 INTO QUOTIENT (UILL BE 
COMPLEMENTED LATER). CARRY IS CLEAR. 



8$: 



10*: 



MOV 



(SP)*.(SP)* 



jPOP THE SAVED DIVIDEND OFF OF THE STACK. 
SHIFT THE RESULT OF THE SUBTRACT ATTEMPT INTO THE QUOTIENT SHIFT REG. 
R5 



ROL 
CLC 
ROR 
ROR 
DEC 
BNE 
COM 



Rl 
R4 
RO 
4* 
R5 



SHIFT NEXT BIT INTO THE INVERTED QUOTIENT. 
DIVIDE THE 

DEVISOR BY 
J 2 (UNSIGNED). 
sCOUNT THIS SHIFT AND SUBTRACT. 
;LOOP FOR ANOTHER SHIFT £ SUB IF NOT DONE. 
sGET QUOTIENT FROM INVERTED QUOTIENT. 



NOU WE EITHER ROUND UP OR LEAVE QUOTIENT ALONE. 



( - 



CLC 
ROL 
BCS 
SUB 
BCS 



R3 
12» 
R4,R3 
14* 



ROUND UP. EXTRA SUBTRACT WENT. 
12*: 



INC 
BNE 
DEC 



R5 
14* 
R5 



CLEAR THE CARRY FOR THE SHIFT OF THE DIVIDEND. 
MULTIPLY LSWORD OF DIVIDEND BY 2. MSWORD IS 0. 
IF CARRY FROM SHIFT. ROUND UP. 
SUBTRACT DIVISOR FROM DIVIDEND. 
IF BORROW. DON'T ROUND UP. 



; INCREMENT THE QUOTIENT BY ONE. 

sIF NO OVERFLOW. WE LEAVE THE ROUND UP. 

iOON'T LET ROUNDING CAUSE OVERFLOW. 



ALL DONE. PASS QUOTIENT AND EXIT 
14*: 



60*: 



MOV 
SEC 

PASS 



RTS 



R5.R1 -.PASS QUOTIENT BACK IN Rl, 

! INDICATE NO OVERFLOW. 

Rl sRESTORE GPRS. LEAVE THE FOLLOWING INTACT: 

MOV Rl.RlSLOTCSP) jPUT Rl IN STACK SLOT. 

JSR PC.a(SP)* : RE TURN TO PREG05 SUBRT, 

;R1 16 BIT. UNSIGNED QUOTIENT. 

PC SCARRY - SET INDICATES NO OVERFLOW (SUCCESS). 



C/OHUeO OHU II FUNC fST PARTI 
GLOBAi SienOUTINE 

4017 
4010 
40 1** 
40^0 
4021 
4022 
4025 
4024 
4025 
4026 
402' 
4028 
402«» 
40?0 
40S1 
4052 
409S 
4054 
4055 
40S6 
4037 

4056 
4039 
4040 
4041 
4042 
4045 
4044 
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.SBTTL GLOBAL SUBROUTINE 



UAIBIC 



WAIT FOR BIT Clear routine 

THIS SUBROUTINE WAITS FOR THE SPECIFIED BIT TO BECOME CLEAR, IF THE 
SPECIFIED BIT GOES TO A CLEAR STATE WITHIN THE SPECIFIED TIME OUT 
PERIOD A SUCCESS INOTCATIQN IS RETURNED Bt THIS ROUTINE. 
THE LAST VALUE WHICH IS READ LOOKING FQR THE CONDITION IS RETURNED TO 
ALLOW THE USE OF THIS ROUTINE TO LOOK FOR DESTRUCTIVE READ CONDITIONS. 

INPUTS: Rl - TIME-OUT VALUE AND BIT Nur«ER INDICATION: 

BITS 15 THRU 12 NUMBER OF BIT TO TEST (RANGE 0 THRU IS"* 
BITS II THRU 0 - TIME-OUT VALUE IN MILLI SECONDS (4095 MAX). 
R2 ADDRESS OF WORD CONTAINING THE BIT TO TEST. 
MSLCNT . 

OUTPUTS: R2 - THE LAST WORD WHICH WAS READ TO CHECK FQR THE CONDITION. 

CARRY - SUCCESS FLAG (CARR": SET IF BIT CLR BEFORE TIME-OUT). 



CALLING SEQUENCE: 



MOV 

MOV 
JSR 



0150040. Rl 

•LABEL,R2 
PC.UAIBTC 



iPASS BIT 11 (13 OCTAL) AND 
J 52 (40 OCTAL) MS DELAt . 
I TEST BIT IN WORD AT -LABEL '. 
jWAIT 52 MS FOR BIT U TO ClR. 



COMMENTS: 

SUBORDINATE ROUTINES CALLED: MSLGET. 



4045 


025214 






WAIBIC:: SAVE 






025214 


004567 


160556 




JSR 


4046 


025220 


010204 




MOV 


R2.R4 


4047 


025222 


010102 




MOV 


R1.R2 


4040 


025224 


042701 


170000 


BIC 


#170000. Rl 


4049 


025250 


042702 


007777 


BIC 


#7777, R2 


4050 


025254 


000502 




SWAB 


R2 


4051 


025256 


006202 




ASR 


R2 


4052 


025240 


006202 




ASR 


R2 


4055 


023242 


006202 




ASR 


R2 


4054 


025244 


016202 


002410 


MOV 


BITTBL(R2).R2 


4055 


023250 


005005 




CLR 


R5 


4056 


02«>52 


004767 


174706 


JSR 


PC. MSLGET 


4057 












4050 


025256 


010002 




MOV 


R0.R2 


4059 


025260 






60 < : PASS 


R2 




025260 


010266 


000006 




MOV 




025264 


004756 






JSR 


4060 












4061 


025266 


000207 




RTS 


PC 



I SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 iCALL REGISTER SAVE SUBRT. 

I SET UP THE ADDRESS PARAMETER FOR MSLGET. 

iSEPERATE DELAY COUNT OUT OF PASSED PARAMETER. 
iSEPERATE LINE NUMBER FIELD OF PASSED PARAM. 
I PUT LINE NUMBER FIELD IN LSBrTE. 
I SHIFT THE LINE NUMBER FIELD INTO THE PROPER 
I POSITION TO USE IT AS A WORD TABLE OFFSET 
t FOR THE TABLE LOOKUP OF THE LINE BIT MAP. 
iGET BIT MAP OF LINE TO TEST FRQM TABLE. 
I INDICATE THAT THE BIT SHOULD BE CLR. 
I WAIT FOR THE BIT TO BE CLR WITHIN TIME OuT. 
I CARRY IS CORRECT UPON MSLGET RETURN. 
tPASS LAST VALUE READ AS OUTPUT PARAMETER. 
{RESTORE GPRS. EXCEPT THE FOLLOWING: 
R2,R2SL0T(SP) iPUT R2 IN S^ACK SLOT. 

PC.WSP). jRETURN TO PRECOS 5U8R^ 

I R2 LAST VALUE READ LOOKING FOR CONDITION, 
t CARRY SUCCESS FLAG (SET IF BIT FCJNO CLR1. 
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40oS 
40M 
4065 
4066 
406* 
406S 
4069 
4070 

40 n 

4072 
4075 
40 ''4 
4075 
4076 
4077 
40 7S 
4079 
4060 
4061 
4062 
408 S 
4064 
4065 
4066 
406" 
40615 
4069 
4090 



.SBTTL GLOBM. SUBROUTINE 



WAIBIS 



- UAIT FOR BIT SET ROUTINE - 
THIS SUBROUTINE UAITS FOR THE SPECIFIED BIT TO BECOME SET. If THE 
SPCCXFIEO BIT GOES TO A SET STATE WITHIN THE SPECIF lEO TIME GOT 
PERZOO A SUCCESS INDICATION IS RETURNED Br THIS ROUTINE. 
THE LAST VALUE UHZCH IS READ LOOKING FOR THE CONDITION IS RETURNED TO 
ALLOU THE USE OT THIS ROUTINE TO LOOK FOR DESTRUCTIVE READ CONDITIONS. 

INPUTSl Rl - TIME-OUT VALUE AND BIT NUMBER INDICATIUN: 

BITS 15 THRU 12 NUMBER OF BIT TO TEST (RANGE 0 THRU 15). 
BITS 11 THRU 0 - TIME-OUT VALUE IN MILL I -SECONDS (4095 MAX). 
R2 • ADDRESS OF WORD CONTAINING THE BIT TO TEST. 
MSLCNT. 

OUTPUTSi R2 - THE LAST WORD UHICH WAS READ TO CHECK FOR THE COrOITION. 

CARRY - SUCCESS FLAG (CARRY SET IF BIT SET BEFORE TIME-OUT). 



CALLING SEQUENCE! 



MOV 

MOV 
JSR 



•1S0040.RI 

«LABEL.R2 
PC.UAIBIS 



iPASS BIT 11 (15 OCTAL) AND 
I 52 (40 OCTAL) MS 0£LA». 
»TEST f.T IN WORD AT "LABEL*. 
iWAIT 52 MS FOR BIT U TO SET. 



COMMENTS i 

SUBORDINATE ROUTINES CALLED: MSLGET. 



4091 


025270 






WAIBIS i: SAVE 






025270 


004567 


160502 




JSR 


4092 


025274 


010204 




NOV 


R2.R4 


4095 


025276 


010102 




MOV 


R1.R2 


4094 


025500 


042701 


170000 


BIC 


•170000. Rl 


4095 


025504 


042702 


007777 


BIC 


♦7777, R2 


4096 


025510 


000502 




SWAB 


R2 


4097 


025512 


006202 




ASR 


R2 


4096 


025514 


006202 




ASR 


R2 


4099 


025516 


006202 




ASR 


R2 


4100 


025520 


016202 


002410 


MOV 


BITTBL(R2).R2 


4101 


025524 


010205 




MOV 


R2.R5 


4102 


025526 


004 767 


174652 


JSR 


PC. MSLGET 


4105 










4104 


025552 


010002 




MOV 


R0.R2 


4105 


025554 






60 •> PASS 


R2 




025554 


010266 


000006 




MOV 




025540 


004736 






JSR 


4106 












4107 


025542 


000207 




RTS 


PC 



I SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 iCALL REGISTER SAVE SUBRT. 

I SET UP THE ADDRESS PARAMETER FOR MSLGET. 

iSEPERATE DELAY COUNT OUT OF PASSED PARAMETER. 
iSEPERATE LINE NUTQER FIELD OF PASSED PARAM. 
iPUT LINE NUrfiER FIELD IN LSBtTE. 
I SHIFT THE LINE NUMBER FIELD INTO THE PROPER 
I POSITION TO USE IT AS A WORD TABLE OFFSET 
I FOR THE TABLE LOOKUP OF THE LINE BIT MAP. 
•GET BIT MAP OF LINE TO TEST FROM TABLE. 
{INDICATE THAT THE BIT SHOULD BE SET. 
iWAIT FOR THE BIT TO BE SET WITHIN TIME OUT. 
I CARRY IS CORRECT UPON MSLGET RETURN. 
iPASS LAST VALUE READ AS OUTPUT PARAMETER. 
iRESTORE GPRS. EXCEPT THE FOLLOWING: 
R2.R2SL0T(SP) |PUT R2 IN STACK SLOT. 

PC.8(SP)» I RE TURN TO PREG05 SUBRT, 

I R2 • LAST VALUE READ LOOKING FOR CONDITION. 
I CARRi - SUCCESS FLAG (SET IF BIT FOUND SETi 



PAGE 83 



EQ 107 



4109 
4110 
4111 
4112 
411S 
4114 
4115 
4U6 

4ir 

4110 
4119 
4120 
4121 
4122 
4125 
4124 
4125 
4126 
4127 
4120 
4129 
4130 
4131 
4132 
4133 
4134 
4135 
4156 
4137 
4138 
4139 
4140 
4141 
4142 
4143 
4144 
4145 
4146 
4147 
4146 
4149 
4150 
4151 
4152 
4155 
4154 
4155 

4156 
4157 
4158 
4159 
4160 
4161 
4162 
416S 
4164 



S8TTL GLOBAL SUBROUTINE 



UDPOR 



- WRITE OAfA PATTERN TQ DEVICE REGISTERS 
THIS ROUTINE WRITES A ROTATED DATA PATTERN TO EACH OF THE 6 DEVICE 
REGISTERS OF EACH ACTIVE LINE OF THE DEVICE UNDER TEST. 
THE DATA PATTERN IS ROTATcD ONCE AFTER EACH WRITE TO A DEVICE REGISTER 
ON A PARTICULAR LINE. THE STARTING DATA PATTERN FOR EACH LINE 
IS ROTATED ONCE AFTER WRITING ALL THE REGISTERS ON A PARTICULAR 
LINE. THIS LEADS TO THE FOLLOWING DATA PATTERN: 

LINE 0. RFGISTER 0 - SHIFTED 0 BIT POSITIONS 
LINE 0. REGISTER 1 SHIFTED 1 BIT POSITION 

LINE 1. REGISTER 0 - SHIFTED I BIT POSITION 
LINE 2. REGISTER I - SHIFTED 2 BIT POSITIONS 

ANV BITS FIELDS IN* THE DEVICE REGISTERS THAT CANNOT BE ALTERED 
ARE MASKED OUT OF THE DATA PATTERN BEFORE IT IS WRITTEN. 
THIS ROUTINE WILL USE EITHER MOV. MOVB. BIS. BISB. BIC. OP BICB 
INSTRUCTIONS. THE UPPER OR LOWER BrTE CAN BE SPECIFIED FOR WRITING. 



INPUTS: 



OUTPUTS: 



R2 - USED TO PASS IN THE DATA PATTERN TO BE ROTATED 6 WRITTEN. 
R3 - BYTE INDICATOR (- ■> LO BYTE. ♦ •> Hi BYTE. 0 •> BOTH). 
R4 OPERATION TYPE INDICATOR ( ■> BIC. ♦ •> BIS, 0 -> MOV). 
ACTLNS - BIT MAP OF THE ACTIVE LII4ES ON THE DEVICE UNDER TEST. 
CSRA - CONTAINS THE CSR ADDRESS OF THE Df-VICE UNDER TEST, 
ORAORT BASE ADDRESS OF DEVICE REGISTER ADDRESS TABLE. 
LPRO EQUATED TO LPR REG OFFSET FROM DEVICE CSR ADDRESS. 
NUMLNS - NUMBER OF LINES ON THE DEVICE UNDER TEST. 
TXBFCO EQUATED TO TBUFFCT REG OFFSET FROM DEVICE CSR ADDRESS, 
UNBTTB - BASE ADDRESS OF THE UNUSED BIT TABLE. 

DEVICE REGISTERS ON ALL ACTIVE DEVICE LINES ARE MODIFIED. 



CALLING SEQUENCE 
COMMENTS: 



JSR 



PC.WOPOR 



THIS ROUTINE DOES NOT WRITE DATA TO THE FOLLOWING REGISTERS. 
RBUF 
RX TIMER 
STAT 

FIFOSIZE 
FIFODATA 

THE CSR IS CLEARED EXCEPT FOR THE IND.AOR.REG FIELD. 



SUBORDINATE ROUTINES CALLED: ROLOAP. 



023344 

023344 004567 160426 



023350 005005 



023S52 010204 



WDPDR:: SAVE 



I ♦ 



I SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PRtG05 tCALL REGISTER SAVE SUBRT. 



i SET UP OUTER LOOP WHICH WRITES THE DATA PATTERN TO EACH LINE'S REGISTERS 

' CLR R5 jCLEAR LINE COUNTER TO SELECT LINE 0. 

IthE OUTER LOOP FOLLOWS. EACH PASS THROUGH THIS LOOP WRITES DATA TO ALL OF 

J THE DEVICE REGISTERS FOR A PARTICULAR LINE IF IT IS ACTIVE. 



2%: 



MOV 



R2.R4 



tSAvE THE OUTER LOOP DATA PMlTERN. 



t9 



4 165 
4166 
4167 
4168 
4169 
4170 
4171 
4172 
4175 
4174 
4175 
4176 
4177 
4178 
4179 
4180 
4181 
4182 
4183 
4184 
4185 
4186 
4187 
4188 
4189 
4190 
4191 
4192 
419S 
4194 
4195 
4196 
4197 



023354 
023960 
023962 
0233/0 
023572 



025576 
025400 
025404 
025410 
025414 
025416 
025420 
025422 
025426 



025450 
023454 
025456 
023440 
023442 
023444 
023446 
023450 
023452 



01057 7 
006305 
096567 
001456 
012701 



010200 
046100 
016105 
005766 
005402 
005205 
000500 
005766 
001412 



005766 
100405 
001404 
150015 
000415 
140015 
000413 
110013 
000411 



156662 
002410 
000004 



002370 
002242 
000010 



000010 



000012 



156640 



t * 

I 

t 

i • 
At: 
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4206 
4207 
4208 
4209 
4210 
4211 
4212 
4213 
4214 
4215 



023476 
023502 
023506 
023512 
023514 
023520 
025524 



4216 
4217 
4218 

4219 023526 

4220 025550 

4221 023534 



004767 
062701 
020127 
001002 
062701 
020127 
003724 



010402 
004 767 
006205 



175766 
000002 
000006 

000002 
000016 



175734 



HOV 
ASL 
BIT 
BEO 
MOV 



R5,8CSRA 
R5 



BITTBL(R5),ACTLNS 



;SET CSR INO.ADR.REG FIELD TO THIS LINE, 
I TURN LINE NUMBER INTO A WORD OFFSET. 



20$ 
OLPRO.Rl 



61: 



THE INNER LOOP FOLLOWS. 
DEVICE REGISTER. 

MOV R2.R0 

BIC UNBTTB(R1),R0 

MOV 0RADRT(R1).R3 

TST R3SL0T(SP) 

BLE 6t 

INC R3 

SWAB RO 

TST R3SL0T(SP) 

BEO 12 t 



jLINE ACTIVE? NO. SKIP THIS LINE. 
I YES. INITIALIZE THE REGISTER OFFSET. 

EACH PASS THROUGH THIS LOOP WRITES DATA TO A 



, CLEAR BIT FIELDS FOR UNUSED REGISTER BITS. 

iGET THE ADDRESS OF THE DEVICE REGISTER. 

J CHECK THE OPERAND TYPE INDICATOR. 

jHiGH BYTE? NO. SKIP HIGH BYTE ADDRESS SET 

J YES. SET THE REG ADDRESS TO THE HIGH BYTE. 

jMOVE HIGH BYTE DATA INTO THE LOU BYTE. 

I CHECK THE OPERAND TYPE INDICATOR. 

J WORD ACCESS? YES. GO PERFORM WORD ACCESS. 



UP, 



jPERFORM BYTE ACCESS TO THE SPECIFIED BYTE OF THE SPECIFIED REGISTER. 

I NO. CHECK THE ACCESS TYPE INDICATOR. 
jUSE BIC? YES. GO PERFORM BICB INSTRUCTION. 
sUSE MOV? YES. GO PERFORM MOVB INSTRUCTION, 
{NEITHER. PERFORM BISB ACCESS TO REGISTER. 



8*: 
lOt: 



TST 


R4SL0T(SP) 


BMI 


8t 


BEQ 


10» 


BISB 


R0.(R3) 


BR 


18f 


BICB 


R0.(R5) 


BR 


18* 


MOVB 


R0.(R5) 


BR 


18t 



{PERFORM BICB ACCESS TO REGISTER. 
(PERFORM MOVB ACCESS TO REGISTER. 



{PERFORM WORD ACCESS 
t 



4198 


023454 


005766 000012 


121: 


TST 


R4SL0T(SP) 


4199 


023460 


100405 




BMI 


14* 


4200 


023462 


001404 




BEQ 


16* 


4201 


023464 


050013 




BIS 


R0.(R3) 


4202 


023466 


000403 




BR 


18* 


4203 


023470 


040013 


14t: 


BIC 


R0.(R3) 


4204 


023472 


000401 




BR 


18* 


4205 


025474 


010013 


16*: 


MOV 


R0.(R3) 



i ♦ 

i 
i 



TO THE SPECIFIED REGISTER. 

I CHECK THE ACCESS TYPE INDICATOR. 

jUSE BIC? YES. GO PERFORM BIC INSTRUCTION. 

lUSE MOV? YES. GO PERFORM MOV INSTRUCTION. 

{NEITHER. PERFORM BIS ACCESS TO REGISTER. 

(PERFORM BIC ACCESS TO REGISTER. 

(PERFORM MOV ACCESS TO REGISTER. 

PREPARE THE DATA PATTERN AND OFFSET FOR THE NEXT REGISTER ON THIS LINE. 



18*: 



19*: 



{ ♦ 

: BACK 
20* : 



JSR PC, ROLDAP (ROTATE DATA PATTERN LEFT. NOT THROUGH CARRY. 

ADD 92, Kl {INCREMENT OFFSET FOR NEXT REGISTER. 

CMP R1.«FSLS0 (CHECK IF THIS IS THE FIFOSIZE/OATA REG 

BNE 19* (AVOID ALTERING THE OFFSET IF IT ISN'T. 

ADO •2.R1 (AVOID TESTING THESE REGISTERS. 

CMP R1.9TXBFC0 (COMPARE REG OFFSET WITH OFFSET OF LAST REG. 

BLE 4* (LOOP IF NOT ALL REG DONE FOR THIS LINE. 

INTO THE OUTER LOOP. NOW SET UP FOR NEXT LINE. LOOP IF NOT DONE. 

MOV R4.R2 (SET UP TO ROTATE THE DATA PATTERN. 

JSR PC. ROLDAP (ROTATE THE DATA PATTERN. 

ASR R5 (CONVERT BACK TO LINE NL»18ER FROM WORD OFFSET. 



A222 021556 005205 

•225 023540 020527 

4224 023544 002702 
4225 

4226 023546 

023546 004 736 

422' 023550 000207 



PARTI HACRQ ni200 
UOPOA 

000020 

60 » 
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INC R5 I COUNT THIS LINE. 

CMP R5.4NUriLNS j COMPARE LINE COUNT WITH NUMBER OF LINES. 

BLi 2% ;LOOP IF SOME LINES NOT DONE. 

PASS J RES TORE GPRS. 

JSR PC.a(SP)» ; RE TURN TO PREG05 SUBR^ 

RT« PC 



G9 



IC TST PARTI 
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4250 
4251 
4232 
4255 
4254 
4255 
4256 
425' 
4230 
4239 
4240 
4241 
4242 
4243 
4244 
4245 
4246 
4247 
4248 
4249 
4250 
4251 
4252 

4253 
4254 
4255 
4256 
4257 
4258 
4259 
4260 
4261 
4262 
4263 
4264 
4265 

4266 



023552 
025552 



025556 
023562 
023564 
023566 



004567 160220 



016701 156470 

010002 

010505 

012704 177777 



025572 004767 173656 



025576 
023576 
C23600 



004756 
000207 



.SBTTL GLOBAL SUBROUTINE 



- UTULNC 



* 
* 

« 

* 

I* 
;* 
* 



LINE CONTROL REGISTER SETUP ROUTINE 
THIS SUBROUTINE IS USED TO SET THE DEVICE UNDER TEST (OUT) LINE 
CONTROL REGISTERS (LNCTRL) TO THE SPECIFIED STATE. ONLt THE LNCTRlS 
rOR THE SPECiriED LINES ARE ALTERED. 



INPUTS: 



RO NEW LINE PARAMETERS. 

R5 - BIT MAP OF LINES TO BE ALTERED 

CSRA - CONTAINS ADDRESS OF THE DuT CSR. 

lESTAT - CONTAINS THE CURRENT STATE OF THE TX AND RX INTERRUPT 

ENABLE BITS IN THE CSR 
LNCTRA - CONTAINS ADDRESS OF THE OUT LNCTRL REGISTERS. 



LNCTRL 



♦ OUTPUTS: 

* CALLING SEQUENCE: 



SPECIFIED OUT LINE CONTROL REGISTERS ARE ALTERED. 
PC.WTULNC 



JSR 



* COMMENTS: 

* SUBORDINATE ROUTINES CALLED: ALTFLD. 



; - - 



UTULNC:: SAVE 



;SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 :CALL REGISTER SAVE SUBRT. 



SET UP THE PARAHtTERS FOR THE CALL TO ALTFLD. 



MOV 
MOV 
MOV 
MOV 



LNCTRA. Rl 
R0.R2 
R5.R5 
« 1.R4 



{SET UP THE REGISTER ADDRESS PARAMETER. 

:SET UP THE DESIRED REGISTER CONTENTS. 

J SET UP THE BIT MAP OF LINES TO ALTER. 

(SELECT ALL REGISTER BITS TO BE ALTERED. 



I CALL THE SUBROUTINE UHICH ALTERS THE REGISTER CONTENTS. 

JSR PC. ALTFLD j ALTER THE REGISTER CONTENTS 

60* : PASS 

RTS PC 



JSR 



: RESTORE GPRS. 
PC.aCSP). 



: RETURN TO PREG05 SUBRT. 



IC TST PARTi 



MACRO M^200 



WTULPf 



1-19 
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4^68 
4c'6<» 
42'0 
4271 
4272 
4273 
4274 
4275 
4276 
42V 
4278 
4279 
4280 
4261 
4282 
4283 
4284 
4285 
4266 
4287 
4268 
4289 
4290 
4291 

4292 
4293 
4294 
4295 
4296 
4297 
4298 
4299 
4300 
4501 
4302 
4303 
4304 

4305 



023602 
023602 



023606 
02S612 
023614 
023616 



023626 
023626 
023630 



004567 160170 



016701 156434 

010002 

010503 

012704 177777 



023622 004767 17S626 



004736 
000207 



.SBTTL 



GLOBAL SUBROUTINE 



WTWLPR 



LIME PARAMETER REGISTER SETUP ROUTINE 
THIS SUBROUTINE IS USED TO SET THE DEVICE UNDER TEST CDUT) LINE 
PARAMETER REGISTERS (LPR) TO THE SPECIFIED STATE. ONLf THE LPRS TOR 
THE SPECIFIED LINES ARE ALTERED. 

INPUTS: RO NEW LINE PARAMETERS. 

R5 - BIT MAP OF LINES TO BE ALTERED. 
CSRA - CONTAINS ADDRESS OF THE OUT CSR. 

lESTAT - CONTAINS THE CURRENT STATE OF THE TX AND RX INTERRUPT 

ENABLE BITS IN THE CSR. 
LPRA CONTAINS ADDRESS OF THE OUT LPR. 



OUTPUTS: LPR 
CALLING SEQUENCE 
COMMENTS: 

SUBORDINATE ROUTINES CALLED: ALTFLD 



SPECIFIED OUT LINE PARAMTER REGISTERS ARE ALTERED. 
JSR PC. WTWLPR 



WTWLPR:: SAVE 



JSR 



•.SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 :CALL REGISTER SAVE SUBRT. 



SET UP THE PARAMETERS FOR THE CALL TO ALTFLD. 



MOV 
MOV 
MOV 
MOV 



LPRA.Rl 
R0.R2 
R5.R3 
• I.R4 



jSET UP THE REGISTER ADDRESS PARAMETER. 

J SET UP THE DESIRED REGISTER CONTENTS. 

jSET UP THE BIT MAP OF LINES TO ALTER. 

I SELECT ALL REGISTER BITS TO BE ALTERED. 



IcALL THE SUBROUTINE WHICH ALTERS THE REGISTER CONTENTS. 

JSR PC. ALTFLD jALTER THE REGISTER CONTENTS 

601 : PASS 

RTS PC 



JSR 



jRESTORE GPRS. 

pc.a(sp)» 



s RE TURN TO PREG05 SUBRT. 



PARI I 



C/OhUBO Dhu 11 »UNC »SI P 
INTEIKlOT service ROt'TINL 



4 JO 7 
4509 
450«» 
4510 
4511 
451^ 
4515 
4514 
4515 
4516 
451' 
4519 
4519 
45^0 
4521 
•i5£c 
4525 
4524 
4525 
4526 
4527 

4529 025652 

025652 004567 160140 
4529 025656 016701 156452 

4550 025642 005201 

4551 025644 102001 

4552 025646 005501 

4555 025650 010167 156440 
4554 025654 

025654 004 756 
4355 025656 000002 
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CACHRX 

.SBTIL INTERRUPT SERVICE ROUTINE 



CACHRX 



CATCH RECEIVER INTERRUPT. 
THIS ROUTINE IS USED IN SEVERAL TESTS. TO LOG A COUNT Of TmE 
NUMBER Of RECEIVER INTERUPTS THAT OCCUR. 

INPUTS: CSRA CONTAINS THE ADDRESS OF THE CSR. 

RXINTC HOLDS THE COUNT OF THE NUMBER OF Rx INTERRUPTS 
THAT OCCURRED. 

OUTPUTS: RXINTC CONTAINS THE UPDATED INTERRUPT COUNT. 



CALLING SEQUENCE: 



PUT THE ADDRESS OF THE LABEL CACHRX IN THE VECTOR 
LOCATION. 



COMMENTS: 

SUBORDINATE ROUTINES CALLED: NONE 



CACHRX : : SAVE 

MOV 
INC 
BVC 
DEC 

2«: MOV 
60f: PASS 

RTI 



JSR 
RXINTC, Rl 
Rl 
2% 
Rl 

Rl. RXINTC 

JSR 



I SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 J CALL REGISTER SAVE SUBRT. 

GET THE RECEIVER INTERRUPT COUNT 

INCREMENT THE COUNT 

BRANCH IF NO OVERFLOW! OCCURRED 

rtESET THE COUNT TO 177777 

SAVE NEW COUNT VALUE 

RESTORE GPRS. 
PC.a(SP)» :RETURN TO PREG05 SUSRT. 



CJOMceO OM(.i 11 fUNC TST PARTI 
INIERR'.*" SERVICE ROUTINE 



4557 
4558 
455'» 
4540 
4541 
4542 
4545 
4544 
4M«i 
4546 
454 7 
4548 
4549 
4550 
4351 
4552 
4555 
4554 
4555 
4356 
4357 
4356 



J' J 

MACRO M1200 15 MAR 64 09:15 PAGE 67 
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lis 



4559 
4360 
4361 
4362 
4365 
4564 

4365 



023660 
023660 
023664 
023670 
023672 
023674 
023676 
023702 
025702 
023704 



004567 160112 
016701 156436 
005201 
102001 
005301 

010167 156424 

004736 
000002 



CACHTX 



• 

J* 
s» 
;♦ 
s* 

!* 

* 
* 

* 
* 
* 



CATCH TRANSMITER INTERRUPT. 
THIS ROUTINE IS USED IN SEVERAL TESTS. TO LOG A COUNT OF THE 
NUMBER or TRANSMISSION INTERRUPTS THAT OCCUR, 



INPUTS! 



OUTPUTS: 



CSRA CCMTAINS THE ADDRESS OF THE CSR. 
TXINTC MOLDS THE COUNT OF THE NUMBER OF 
THAT OCCURRED. 



TX INTERRUPTS 



TXINTC CONTAINS THE UPDATED INTERRUPT COUNT. 



CALLING SEQUENCE: 



PUT THE ADDRESS OF THE LABEL CACHTX IN THE VECTOR 
LOCATION. 



COMMENTS: 

SUBORDINATE ROUTINES CALLED: NONE 



CACHTX: : SAVE 

MOV 
INC 
BVC 
DEC 

2f : mv 
601 : PASS 

RTI 



;SAVE CONTENTS OF GPRS RO THRU R5. 
JSR R5.PREG05 sCALL REGISTER SAVE SUBRT. 

TXINTC. Rl jGET THE TRANSMISSION INTERRUPT COUNT 

Rl {INCREMENT THE COUNT 

2$ -.BRANCH IF NO OVERFLOU OCCURRED 

Rl jRESET THE COLWT TO 177777 

R I. TXINTC ;SAVE NEW COOI^T VALUE 

» RES TORE GPRS. 

JSR PC.aCSP)* ;RETURN TO PREG05 SuBRT 



PARTI 
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4567 






4560 






456*9 






4370 






4S71 






4S72 






4S75 






4374 






4375 






4376 






43''7 






4378 






4379 






4380 






4381 






4382 






4385 






4384 






4385 






4386 






4387 






4388 






4389 






4390 


023706 


005767 


4391 


023712 


001402 


4392 


023714 


005367 


4393 


023720 


005767 


4394 


023724 


001402 


4395 


023726 


005367 


4396 


023732 


005367 


4397 


023736 


001006 


4398 


023740 


016767 


4J99 


023746 


010046 


4400 


023750 






023750 


104422 


4401 


023752 


012600 


4402 


023754 


000002 



.SBTTL INTERRUPT SERVICE ROUTINE 



CLKINT - 



THIS ROOTINE IS EXECUTED CLKHRZ TIMES PER SECOND. 
TWO TII1ER COUNTERS OOUN TO ZERO. 



IT DECREMENTS TME 



INPUTS: 



OUTPUTS: 



TIMERl - TIMER COUNTER «1, 
TIMER2 TIMER COUNTER «2. 
TIMERS - TIMER COUNTER FOR 



CALL OF BREAK MACRO. 



THE 2 TIMER COUNTERS ARE DECREMENTED IF THEY ARE NOT ZERO, 



CALLING SEQUENCE: 



PUT OCLKINT IN TME CLOCK INTERRUPT VECTOR SLOT. 
PUT THE DESIRED TIME PERIOD (SECONDS TIMES CLKMRZ) IH 
EITHER TIMERl OR TIMER2 AND POLL THE RESPECTIVE TIMER 
COUNTER TO DETECT ITS GOING TO 0 ON TIME OUT. 



COMMENTS: THE 2 COUNTERS WILL NOT WRAPAROUND BUT WILL STOP AT 0. THIS 

ALLOWS THE DETECTION OF A TIME-OUT ANY TIME AFTER THE TIME-OUT 
HAS OCCURRED UNTIL THE TIMER COUNTER IS SET TO ANOTHER VALUE. 

SUBORDINATE ROUTINES CALLED: NONE. 



156432 

156424 
156422 

156414 
156412 

156406 156402 



2«: 
4$: 



60$: 



TST 


TIMERl 


i CHECK FOR TIMERl AT ZERO. 


BEQ 


2i 


J BRANCH TO LEAVE IT AT ZERO IF IT IS ZERO. 


DEC 


TIMERl 


;DECREMENT TIME COUNT. 


TST 


TIMER2 


;CHECK FOR TIMER2 AT ZERO. 


BEQ 


4$ 


;BRANCH TO LEAVE IT ALONE IF IT'S ALREADY ZERO 


DEC 


TIMER2 


; DECREMENT TIME COUNT. 


DEC 


TIMERS 


: DECREMENT THE BREAK COUNT. 


BNE 


60* 


lEXIT IF NOT TIME TO CALL BREAK. 


MOV 


BCOUNT. TIMERS 


sSET UP TIME TILL NEXT BREAK. 


MOV 


RO.-CSP) 


{SAVE CONTENTS OF RO FROM BREAK MACRO. 


BREAK 




iCHECK FOR OPERATOR CONTROL/C. 






TRAP CtBRK 


MOV 


(SP)».RO 


1 RESTORE CONTENTS OF RO. 


RTI 







PARTI 



MACRO M1200 
RXBRRT 



15 MAR 84 09:15 PAGE 89 



<^Ea 115 



4404 
4405 
4406 
4407 
4408 
4409 
4410 
4411 
4412 
4413 
4414 
4415 
4416 
4417 
4418 
4419 
4420 
4421 
4422 
4423 
4424 
442S 
4426 
4427 
4478 
4429 
4430 

4451 
4432 
4433 
4434 
4435 
4436 
4437 
4438 
4439 
4440 
4441 
4442 

4443 



.S8TTL INTERUPT SERVICE ROUTINE 



RXBRRT - 



023756 
023756 
023762 
023766 
023772 
023774 
023776 
024002 
024006 
024012 
024020 
024022 
024026 
024032 
024032 
024034 



004567 
017700 
016701 
005201 
001402 
010167 
016701 
052701 
032767 
001402 
052701 
010167 

004736 
000002 



160014 
156256 
156322 



156312 
156310 
000001 
000001 

040000 
156264 



* 
* 

* 

* 

* 

* 
* 
* 
* 



- BR LEVEL TEST RECEIVE INTERRUPT SERVICE ROUTINE 

THIS SERVICE ROUTINE HANDLES RECEIVE INTERRUPTS DURING THE INTERRUPT 
BR LEVEL TEST. THIS ROUTINE COUNTS THE INTERRUPT AND SETS A FLAG 
TO INDICATE THAT THE INTERRUPT HAS OCCURRED, IT ALSO CHECKS THE 
FLAG WHICH INDICATES THAT A TX INTERRUPT HAS OCCURRED. IF tmE TX 
INTERRUPT FLAG IS SET. THIS ROUTINE SETS AN INTERRUPT ORDER ERROR 
FLAG INDICATING THAT A TRANSMIT INTERRUPT WAS SERVICED BEFORE A 
SIMULTANEOUS RECEIVE INTERRUPT. 

INPUTS: RXINTC - HOLDS THE COUNT OF THE NUMBER OF Rx INTERUPTS. 

RXINTF RX INTERRUPT FLAGS. 

OUTPUTS: RXINTC - CONTAINS THE UPDATED INTERUPT COUNT. 

RXINTF RX INT FLAGS: 

(BIT 0 SET. BIT 14 SET IF TXINTF BIT 0 IS SET.) 



PUT THE ADDRESS OF THE LABEL RXBRRT IN THE VECTOR 
LOCATION. 

THE FIFO IS NOT PURGED BY THIS ROUTINE. 



* CALLING SEQUENCE: 

* COMMENTS: NOTE; 

* SUBORDINATE ROUTINES CALLED: NONE. 



156310 



21: 



41: 
60$: 



SAVE 




{SAVE CONTENTS Of GPRS RO THRU R5. 




JSR 


R5.PREG05 ;CALL REGISTER SAVE SUBRT. 


HOV 


SRBUFA.RO 


jREAD THE CHAR OUT OF THE FIFO. 


MOV 


RXINTC. Rl 


;GET THE INTERUPT COUNT. 


INC 


Rl 


1 INCREMENT THE COUNT. 


BEQ 


2i 


» BYPASS UPDATING COUNT IF OVERFLOW OCCURRED. 


MOV 


Rl. RXINTC 


tSAVE NEW COUNT VALUE. 


MOV 


RXINTF. Rl 


;GET THE RX INTERRUPT FLAGS. 


BIS 


«eiTO.Rl 


J SET THE RX INTERRUPT HAS OCCURRED FLAG. 


BIT 


•BITO. TXINTF 


J TEST THE "TX INT HAS OCCURRED" FLAG. 


BEQ 


4> 


;SKIP SETTING ERROR FLAG IF NO TX INT. 


BIS 


«BIT14.R1 


iSET THE INTERRUPT ORDER ERROR FLAG. 


MOV 


Rl. RXINTF 


(UPDATE THE RX INTERRUPT FLAGS. 


PASS 




; RES TORE GPRS. 



RTI 



JSR 



pc.acsp)* 



; RETURN TO PREG05 SUBRT, 
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4464 
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4470 
4471 
4472 
4473 
4474 
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S8TTL INTERUPT SERVICE ROUTINE - I^XINPT 

********* ***««**«***«***«**4i******«4*** ***************** **4i*«**«*4i 

- RECEIVE CHARACTER INPUT INTERRUPT SERVICE ROUTINE 
THIS SERVICE ROUTINE INPUTS A CHARACTER FROM THE OUT AND LOADS THE 
CHAR (COMPLETE WITH STATUS FLAGS) INTO A RECEIVE CHAR BUFFER IN 
MEMORY. THE INTERRUPT IS ALSO COUNTED. THE RECEIVE CHAR BUFFER IS 
MONITORED TO ENSURE THAT IT DOES NOT OVERFLOW. 



INPUTS: 



OUTPUTS: 



BUFENO - LABELS THE END OF THE HOST MEMORY BUFFER. 

BUFPTR - CONTAINS ADDRESS OF NEXT FREE BUFFER LOCATION. 

CSRA - CONTAINS THE ADDRESS OF THE OUT CSR. 

RBUFA CONTAINS THE ADDRESS OF THE RBUF OUT REGISTER. 
RXINTC HOLDS THE COUNT OF THE NUMBER OF RX INTERUPTS. 
RXINTF RX INTERRUPT FLAGS. 

BUFPTR - CONTAINS UPDATED ADDRESS OF NEXT FREE BUFFER LOCATION. 

RXINTC - CONTAINS THE UPDATED INTERUPT COUNT. 

RXINTF - RX INT FLAGS (BIT 15 SET IF RX. DATA. AVAIL IS CLEAR). 



CALLING SEQUENCE: 



PUT THE ADDRESS OF THE LABEL RXINPT IN THE VECTOR 
LOCATION. 



4475 


024036 






RXINPT: 


: SAVE 






024036 


004567 


157734 






JSR 


4476 


024042 


017701 


156174 




MOV 


9CSRA.R1 


4477 


024046 


032701 


000200 




BIT 


♦flIT7.Rl 


4478 


024052 


001003 






BNE 


2t 


4479 


024054 


052767 


100000 


156234 


BIS 


OBIT 15. RXINTF 


4480 


024062 


016701 


156226 


21: 


MOV 


RXINTC. Rl 


4481 


024066 


00S201 






INC 


Rl 


4482 


024070 


001402 






BEQ 


4$ 


4483 


024072 


010167 


156216 




MOV 


Rl. RXINTC 


4484 


024076 


016702 


156200 


4$: 


MOV 


BUFPTR, R2 


4485 


024102 


017722 


156136 




MOV 


SRBUFA.(R2)* 


4486 


024106 


020267 


157614 




CMP 


R2. BUFENO 


4487 


024112 


103002 






BHIS 


60 » 


4488 


024114 


010267 


156162 




MOV 


R2. BUFPTR 


4489 


024120 
024120 


004736 




60$: 


PASS 


JSR 


4490 


024122 


000002 






RTI 





COMMENTS: IN CASE OF OVERFLOW OF THE MEMORY BUFFER. BUFPTR WILL BE 

MAINTAINED EQUAL TO BUFENO AND THE WORD AT BURFPTR WILL BE 
THE LAST WORD READ FROM THE OUT FIFO. 

NOTE: THIS ROUTINE CAN DESTROY TX. ACTIONS BY READING THE CSR. 
SUBORDINATE ROUTINES CALLED: NONE. 

■ *************************************************************************** 

I SAVE CONTENTS OF GPRS RO THRU R5. 
R5.PREG05 :CALL REGISTER SAVE SUBRT. 

sREAD THE CONTENTS OF THE CSR. 
iTEST RX. DATA. AVAIL BIT. 

BRANCH AROUND SETTING FLAG IF BIT IS SET. 
SET THE RX. OAT A. AVAIL CLEAR FLAG. 
GET THE INTERUPT COUNT. 
INCPEMENT THE COUNT. 

BYPASS UPDATING COUNT IF OVERFLOW OCCURRED. 
SAVE NEW COUNT VALUE. 

GET THE POINTER TO NEXT FREE BUFFER WORD. 
READ A CHAR FROM THE FIFO INTO BUFFER. 
TEST FOR POINTER BEYOND END OF BUFFER. 
J SKIP THE PTR UPDATE IF PTR OUT OF BOt»JCS. 
; UPDATE THE BUFFER POINTER. 
: RESTORE GPRS. 

PC,a(SP)» {RETURN TO PREG05 SUBRT, 



N9 
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*;E0 117 



4492 
4493 
4494 
4495 
4496 
4497 
4498 
4499 
4500 
4501 
4502 
4503 
4504 
4505 
4506 
4507 
4506 
4509 
4510 
4511 
4512 
4513 
4514 
4515 
4516 
4517 
4516 
4519 
4520 



024124 021627 017764 

024130 001402 

024:52 000177 156164 

024156 052767 100000 

024144 000002 



156154 



.SBTTL GLOBAL TRAP SERVICE ROUTINE 



TP4RTN 



BUS TIME-OUT TRAP (004 TRAP) SERVICE ROUTINE 
THIS ROUTINE DETERMINES IF THE 004 TRAP UAS CAUSED BY 
AN "EXPECTED" ERROR OR NOT BY EXAMINING THE RETURN PC VALUE ON THE 
STACK. IF THE TRAP IS UNEXPECTED. THIS ROUTINE JUMPS TO THE NORMAL 
DIAGNOSTIC SUPERVISOR 004 TRAP HANDLING ROUTINE. 



SP - POINTS TO THE PC UHERE THE TRAP OCCURED. 
AORPTR LABEL AT THE ADDRESS UHERE "EXPECTED 
TP4FLG - 004 TRAP FLAGS. 



* 

* INPUTS: 

* OUTPUTS: 

* CALLING SEQUENCE: 
* 

* COMMENTS: ANY 004 TRAP WHICH OCCURS AT AN ADDRESS OTHER THAN THAT LABELED 

* AORPTR WILL BE HAr«>LE0 BY THE NORMAL 004 TRAP SERVICE ROUTINE. 
* 

* SUBORDINATE ROUTINES CALLED: NONE. 

********************** *************** A**************** *************** 



TRAPS OCCUR. 

TP4FLG - BIT 15 IS SET IF "EXPECTED" TRAP OCCURED. 



PUT ADDRESS POINTED TO BY TP4RTN IN 004 VECTOR. 
OCCURENCE OF 004 TRAP VECTORS- TO THIS ROUTINE. 



TP4RTN:: CMP 
BEQ 
JMP 

2(: BIS 
RTI 



(SP).*ADRPTR 
2$ 

aTP4VEC 
♦BIT15.TP4FLG 



COMPARE EXPECTED ADR AGAINST TRAP RET PC. 
IF THEY MATCH. CONTINUE THIS ROUTINE. 
IF NOT. JUMP TO NORMAL 004 TRAP SERVICE RTN. 
SET THE 004 TRAP OCCURED FLAG. 
J ALL DONE, GO BACK TO THE TEST. 



C20M«.IB0 OMk.' n H.INC Ibl PAST I 
INTtRC^T SERVICE AOC'TINT 



452 J 

4525 
4526 
452"' 
45:?« 
452'» 
4530 
45SI 
45.V 
4553 
4554 
4555 
45 So 
455' 
4558 
4550 
4540 
4541 
4542 
4545 
4544 
4545 
4546 



454 7 
4546 
4549 

4550 
4551 
4552 
4555 
4554 
4555 
4556 
4557 
4556 

4559 



024146 
024146 
024152 
024156 
024160 
024162 
024164 
024170 
024174 
024200 
024202 
024206 
024212 
024216 
024216 
024220 



004567 
016701 
005201 
102001 
005501 
010167 
016705 
017702 
100402 
052 70S 
052705 
010567 

004756 
000002 



BIO 
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<^E0 116 



157624 
156150 



156156 
156154 
156042 

100000 
000001 
156112 



TXINTR 



- TRANSMIT INTERRUPT SERVICE ROUTINE - 

THIS ROUTINE HANDLES A TRANSMIT INTERRUPT FROM THE DEVICE UNDER TEST 
(OUT) BY COUNTING THE INTERRUPT AND READING THE DUT CSR TO CLEAR THE 
INTERRUPT REQUEST. THIS ROUTINE ALSO SETS A FLAG TO INDICATE THAT 
A TX INTERRUPT MAS OCCURRED AND SETS A FLAG IF THE TX. ACT ION BIT IS 
NOT SET IN THE READ CONTENTS OF THE OUT CSR. 



INPUTS: 



OUTPUTS: 



CSRA - 
TXINTC 
TXINTF 

TXINTC 
TXINTF 



CALLING SEQUENCE: 



CONTAINS THE ADDRESS OF THE CSR. 

HOLDS THE COUNT OF THE NUMBER OF Tx INTERUPTS. 
TX INTERRUPT FLAGS. 

CONTAINS THE UPDATED TX INTERUPT COUNT. 

TX INT FLAGS (BIT 0 SET, BIT 15 SET IF TX. ACTION CLR). 

PUT THE ADDRESS OF THE LABEL TXINTR IN THE VECTOR 
LOCATION. 



COMMENTS: 

SUBORDINATE ROUTINES CALLED: NONE 



TXINTR: 


: SAVE 




J SAVE CONTENTS OF GPRS RO THRU R5. 








JSR 


R5.PREG05 »CALL REGISTER SAVE 


SUBRT. 




MOV 


TXINTC. Rl 


jGET THE TX INTERUPT COUNT. 






INC 


Rl 


{INCREMENT THE COUNT. 






BVC 


2« 


1 BRANCH IF NO OVERFLOW OCCURRED. 






DEC 


Rl 


iRESET THE COUNT TO 177777. 




2»: 


MOV 


Rl. TXINTC 


iSAVE NEW COUNT VALUE. 






MOV 


TXINTF. R5 


»GET THE TX INTERRUPT FLAGS. 






MOV 


aCSRA,R2 


jREAO THE CSR. 






BMI 


4t 


;SKIP SETTING OF FLAG IF TX. ACTION 


IS SET. 




BIS 


•8IT15.R5 


iSET THE TX. ACT ION CLEAR FLAG. 




4t: 


BIS 


•eiTO.RS 


J SET THE TX INT HAS OCCL»»REO ''LAG. 






MOV 


R5. TXINTF 


lUPOATE THE TX INTERRUPT FLAGS. 




60 »: 


PASS 


1 RE 5 TORE GPRS. 








JSR 


PC,a(SP)» jRETuRN TO 


PREG05 



RTI 



4^69 

45ri 

457^ 

45 rs 
45 "4 
4575 

4576 

4577 024222 
02*222 

4578 

4579 0242^2 

024222 000167 
024224 000000 

4580 
4581 
«582 

4585 024226 
024226 

024226 104425 



t PARTI 



CIO 

MA^^^^^aOO 15 MAR tU 09; 15 PAGE 93 
.SBTTl REPORT COOING SECTION 



, THE REPORT COOING SECTION CONTAINS THE 

I PRINTS* CALLS THAT GENERATE STATISTICAL REPORTS. 



BGNRPT 



EXIT 

.EVEN 
ENDRP1 



RPT 



L»RPT: 



.WORD Jl.iMP 
.UCRO L 1001 7 2 



LlOOir: 

TRAP C»RPT 



4596 
4597 
4590 
4599 

4600 024230 
0242SO 

4601 

4602 024250 177777 

4605 024232 177777 
4604 024234 177777 
4605 

4606 024236 
4607 



DiO 

HACRO M1200 15 MAR 84 09:15 PAGE 94 
.SBTTL PROTECTION TABLE 



I THIS TABLE IS USED BY THE RUNTIME SERVICES 
I TO PROTECT THE LOAD MEDIA, 



BGNPROT 



1 

-1 
1 

ENOPROT 



jOFFSET INTO P 
I OFF SET INTO P 
J OFF SET INTO P 



L»PROT: : 

TABLE FOR CSR ADDRESS 
TABLE FOR MASSBUS ADDRESS 
TABLE FOR DRIVE NUMBER 



CZDMUBO DMU 11 TUNC TST PARTI 
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4629 
46S0 
4631 
4632 
4635 
4634 
4655 
4636 
465- 
4638 
4659 
4640 
4641 
4642 
4645 
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121 



4644 

4645 



4646 

4647 
4648 



4649 

4650 
4651 



4652 

4653 
4654 



4655 

4656 
4657 
4658 

4659 
4660 
4661 
4662 



4663 
4664 
4665 
4666 
4667 
4668 



024256 
024236 

024236 
024256 
024242 
024244 
024244 

024246 
024246 
024252 
024254 
024254 

024256 
024256 
024262 
024264 
024264 

024266 
024266 
024272 
024274 
024274 
024276 
024302 
024302 
024302 



024304 
024304 
024310 
024312 
024314 
024320 
024324 
024330 
024334 
024342 



012700 
104447 

103416 



012700 
104447 

103556 



012700 
104447 

103555 



012700 
10444 7 

103161 
000167 



104433 



012700 
104462 
010001 
012167 
012167 
012167 
012167 
026727 
001004 



000040 



000037 



000035 



000036 



000540 



000114 



156014 
156012 
156010 
156006 
156002 



SSTTL INITIALIZE SECTION 



THIS SECTION CONTAINS THE CODE UHICH IS PERFGRHEO AT 
EACH PASS OR AFTER A CONTINUE COHHAND. 
THIS CODE PERrORHS THE rOLLOUING ACTIONS; 



THE BEGINNING OF 



MOVES THE INFORMATION HELD IN THE HARDWARE P- TABLE INTO THE GLOBAL 
DATA AREA. 



8GNINIT 

tSEE IF PROGRAM JUST STARTED, BR IF YES 
READEF «EF. START 



LIINIT: 



BCOMPLETE 



NEUSTA 



;SEE IF PROGRAM JUST RESTARTED, BR IF YES 
READEF ^EF. RE ST ART 



BCOMPLETE 



NEURES 



J SEE IF THIS IS A NEW PASS. BR I»^ YES 
READEF •EF.NEU 



BCOMPLETE 



NEUPAS 



I SEE IF PRO*:^RAM WAS JUST CONTINUED 
READEF tfEF. CONTINUE 



NEUSTA: 



I ♦ 



BNCOMPLETE 
JMP ENOIT 
BRESET 



GETPRM 



MOV 
TRAP 

BCS 



MOV 
TRAP 

BCS 



MOV 
TRAP 

BCS 



MOV 
TRAP 

BCC 



#EF .START. RO 
CIREFG 

NEUSTA 



«EF. RESTART.ro 
CIREFG 

NEURES 



♦EF.NEU.RO 
CIREFG 

NEUPAS 



♦ef.continue.ro 

CIREFG 
GETPRM 



sRESET THE BUS TO PREVENT ILLEGAL INTERRUPTS. 



TRAP 



J SET UP FOR LINE TIME CLOCK INTERRUPTS. 

CLOCK L.Rl jGET THE CLOCK PARAMETERS. 



000062 



MOV (R1)..CLKCSR 

MOV CR1)»,CLKBRL 

MOV (Rl)»,CLKVEC 

MOV (Rl)..CLKHRZ 

CMP CLKHRZ.OSO. 

BNE 21 



MOV 
TRAP 
MOV 

J STORE CLOCK CSR ADDRESS. 

» STORE CLOCK BUS REQ INT LEVEL. 

t STORE CLOCK INTERRUPT VECTOR. 

; STORE CLOCK FREQUENCY. 

I TEST FOR 50MZ LINE FREQUENCY. 

{BRANCH IF CLOCK IS NOT 50HZ . 



C IRE SET 



*'L.RO 
CIClCK 
RO.RL 



9, 
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4669 


024544 


012767 


000024 


4670 


024552 


000405 




4671 


024354 


012767 


000021 


4672 


024362 








024362 


012746 


000500 




024366 


012746 


025706 




024372 


016746 


155742 




024376 


012746 


000005 




024402 


104457 






024404 


062706 


000010 


4675 


024410 


016700 


155726 


4674 


024414 


006500 




4675 


024416 


010067 


155730 


4676 


024422 








024422 


012700 


000240 




024426 


104441 




4677 








4678 








4679 








4660 








4661 








4662 


024430 


016767 


155550 


4663 


024456 


012767 


024124 


4664 








4665 








4686 








4687 


024444 


005067 


155650 


4686 


024450 


012767 


000100 


4689 


024456 


012700 


002552 


4690 


024462 


016701 


155646 


4691 


024466 


004767 


175260 


4692 


024472 


016767 


155624 


4695 


024500 


103405 




4694 


024502 


005067 


155654 


4695 


024506 


000402 




4696 








4697 








4696 








4699 024510 


004767 


173012 


4700 






4701 








4702 








4705 








4704 


024514 


016767 


153264 


4705 


024522 


012767 


024124 


4706 


024550 


005067 


155564 


4707 


024554 


005067 


155572 


4708 


024540 


012700 


002332 


4709 


024544 


016701 


155610 


4710 


024550 


005067 


155606 


4711 


024554 


005067 


155604 


4712 


024560 


004767 


173166 


4713 


024564 


016767 


155532 


4714 


024572 


105005 




4715 


024574 


012767 


000001 


4716 


024602 


005067 


1SSS04 


4717 


024606 


000167 


000006 



156002 
155772 



2<: 
4t: 



m\i 920. .MSTICK 

BR 4t 

MOV »17., MSTICK 

SETVEC CLKVEC.#CLKINT.«PHI06 



I INDICATE 20MS PER CLOCK TICK. 

J INDICATE 17 MS PER CLOCK TICK, 
} INITIALIZE CLOCK INTERRUPT VECTOR. 



MOV CLKHRZ.RO 

ASL RO 

MOV RO.BCOUNT 

SETPRI 4PRI05 



MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 

: INITIALIZE THE BREAK COUNT 
t TO CAUSE A BREAK 
; EVERY 2 SECONDS. 

t ALLOW CLOCK INTERRUPTS DISABLE OTHERS 

MOV 
TRAP 



»PRI06.-(SP) 
•CLKINT. -(SP) 
CLKVEC, -(SP) 
#5. (SP) 
CJSVEC 
010. SP 



*PRI05.R0 
CSSPRI 



155664 
153340 



155654 



153504 



t ENABLE THE LINE TIME CLOCK (LTC) CHECKING TO MAKE SURE THAT THE CSR 
J IS ACCESSA8LE. 

s FIRST SET UP TO CATCH ANY 004 TRAPS WHICH OCCUR: 

' MOV 4.TP4VEC tSAVE THE EXISTING 004 TRAP VECTOR. 

MOV •TP4RTN.4 :SET 004 TRAP VECTOR TO OUR SERVICE RTN ADR 

r ENABLE LTC CHECKING FOR 004 TRAP IN CASE CSR IS NOT THERE. 

t - 

CLR 
MOV 
MOV 
MOV 
JSR 
MOV 
BCS 
CLR 
BR 

I CALIBRATE THE DELAY ROUTINE MILLI -SECOND DELAY COLNT VALUE 

6t: JSR 
I ♦ 



TP4FLG 

•6IT6.WGR01 

•WORDl.RO 

CLKCSR.Rl 

PC.CKTRAP 

TP4VEC.4 

6t 

CLKHRZ 
St 



PC.CALMSL 



i CLEAR THE 004 1RAP FLAG. 
jSET UP TO SET BIT6 OF THE LTC CSR. 
J SET UP WORDl AS THE CKTRAP MOVE SOURCE. 
J SET UP LTC CSR AS DESTINATION FOR CKTRAP MOVE, 
(MOVE AND CHECK FOR TRAP. 
J RESTORE THE NORMAL 004 TRAP VECTOR. 
J IF NO TRAP, LTC IS THERE SO CONTINUE. 
jCLEAR LTC FREQUENCY WORD TO INDICATE NO LTC. 
; BYPASS THE FOLLOWING CALIBRATION PROCEDURES. 



155600 
153254 



CHECK FOR MEMMORY MANAGEMENT PRESENT ON THIS MACHINE 
J IF MEM MGT IS PRESENT, DISABLE IT. 
t - 
8t: 



153212 
155560 



10%: 



MOV 


4.TP4VEC 


MOV 


♦TP4RTN,4 


CLR 


TP4FLG 


CLR 


WORDl 


MOV 


OWORDl .RO 


MOV 


MMSRO.Rl 


CLR 


MMPRES 


CLR 


MMENAB 


JSR 


PC.CKTRAP 


MOV 


TP4VEC.4 


BCC 


10< 


MOV 


01. MMPRES 


CLR 


PASCNT 


JfiP 


NEWPAS 



(SAVE THE EXISTING 004 TRAP VECTOR. 
J SET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 
I CLEAR THE 004 TRAP FLAG. 

J PREPARE TO CLEAR THE MEM MGT SRO REGISTER. 

t SELECT CLEARED WORD AS CKTRAP RTN SOURCE. 

J SELECT MEM MGT SRO REGISTER AS DESTINATION. 

{INDICATE NO MEM MGT PRESENT IN CASE IT ISN" T . 

J INDICATE MEM MGT IS NOT ENABLED. 

t CLEAR THE MEM MCT SRO REG AND CHECK FOR TRAP. 

J RESTORE THE NORMAL 004 TRAP VECTOR. 

jSKIP INDICATING MEM MGT PRESENT IF IT ISN' » . 

8 INDICATE THAT MEM MGT IS PRESENT. 

iCLR COUNTER USED IN REPORTING ROM VERSION 9. 

:SKIP AROUND THE BUS RESET. ITS BEEN DOHE. 
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4718 
4719 

4 720 
4721 
4722 
4725 
4 •'24 
4725 
4726 
4727 
4 728 
4729 
4730 
4731 
4 732 
4733 
4754 
4735 
4736 
4757 



4758 

4739 
4740 
4741 
4742 
4745 
4744 
4745 
4746 
4747 
4748 
4749 
4750 
4751 
4752 
4755 
4754 
4755 
4756 
4757 
4758 
4759 
4760 
4761 
4762 
4763 
4764 
4 765 
4766 
4767 
4768 
4 769 



024612 
024612 
024614 
024620 
024620 



024626 
024652 
024654 



024640 
024640 
024644 
024652 

024654 
024654 
024660 
024662 
024664 
024664 
024666 



024670 
024674 
024676 
024702 
024706 
024712 
024716 



024722 
024726 
024750 
024 732 
024756 
024742 
024744 
024746 
024750 
024752 



024754 
024 760 



104455 

005067 

012767 



005267 
001002 
005367 



005267 
026767 
002362 



016700 
104442 
010001 

103401 
000764 



012167 
012102 
010267 
062702 
010267 
012167 
111167 



016701 
005201 
005201 
012703 
012702 
010122 
005201 
005201 
005305 
001373 



012700 
012701 



155472 
177777 

155460 
155452 



155572 
155366 



155556 



155410 



NEURCS: 
NEUPAS: 



BRESET J RESET IME BUS TO PREVENT ILLEGAL INTERRUPTS. 

TRAP CIREaET 

CLR PASCNT iCLR COUNTER USED IN REPORTING ROM VERSION 

MOV * l.UNITN (RESET LOGICAL DEVICE TO -1 



J INCREMENT THE PASS COUNTER. CORRECT FOR ANY OVERFLOW. 
8 THIS COUNTER IS USED IN THE ROM VERSION TEST. 

* INC PASCNT ; INCREMENT THE PASS COUNTER. 

BNE GETPRM ;BRANCH IF UE HAVE NOT YET! OVERFLOUEO. 

DEC PASCN^ J SET PASS COUNT TO 177777 OCTAL. 



155140 



; GET THE HARDWARE PARAMETERS FOR THIS UNIT 
GETPRM: 

INC UNITN 
CHP UNITN. LtUNIT 

BGE NEWPAS 



(INCREMENT LOGICAL DEVICE NUMBER 
(SEE IF MAXIMUM UNIT NO. EXCEEDED 
iBR IF YES 



GPHARD UNITN.Rl 

BCOMPLETE 50 » 

BR GETPRM 



(GET P TABLE POINTER INTO Rl 

:BR IF DEVICE AVAILABLE 
J SKIP THIS DEVICE 



MOV 

TRAP 

MOV 

BCS 



UNITN. RO 

CJGPHRD 

RO.Rl 

30$ 



155346 

155350 
000004 
155322 
155312 
155316 



155514 



000007 
002244 



30$: 



MOV (R1)*.CSRA 

MOV (fll)».R2 

MOV R2.RXVECA 

ADO «4,R2 

MOV R2,TXVECA 

MOV CRl)*.ACTLNS 

HOVB (Rl).BRLEVL 



HARDWARE PARAMETER MOVING CODE 



(STORE DHU-11 CSR ADDRESS IN DEV. REG. ADDRESS TABLE 
(GET THE RX INTERRUPT VECTOR ADDRESS. 
(STORE RX INT VECTOR ADDRESS. 
(CALCULATE TX INTERRUPT VECTOR ADDRESS. 
(STORE TX INT VECTOR ADDRESS. 
(STORE DHU-11 ACTIVE LINE BIT MAP 
(STORE OHU 11 INTERUPT BUS REQUEST LEVEL 



12»: 



002526 
002726 



CALCULTATE DEVICE REGISTER ADDRESSES. AND PUT THEM IN THE 
DEVICE REGISTER ADDRESS TABLE. 

MOV CSRA.Rl (COPY CSR ADDRESS 

INC Rl (INCREMENT CSR ADDRESS 

INC Rl ( COPY BY 2. 

MOV «7.R5 (SET UP REGISTER COUNT 

MOV 0RBUFA.R2 (GET LOCATION WHERE RBUF ADDRESS GOES IN TABLE 

MOV R1.(R2>* (STORE REGISTER ADDRESS IN TABLE 

INC Rl (INCREMENT REGISTER ADDRESS 

INC Rl ( BY 2. FOR THE NEXT DEVICE REGISTER. 

DEC R3 (DECREMENT REGISTER COUNT 

BNE 12) (LOOP IF NOT DONE 



INITIALISE THE BMP CODE QUEUE. 

MOV •BMPCQB.RO jGET THE START ADDRESS OF THE QUEUE. 

MOV (MJMPCQE.Rl (GET THE END ADDRESS OF THE QUEl€ . 
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^E0 IP4 



4 VO 
4771 
477^ 
4775 
4 774 
4 775 
4776 
4777 
4778 
4779 
4780 
4781 
4782 



4783 
4 784 
4785 
4786 
4787 
4788 
4789 



4790 



4791 
4792 



024 ;64 
024770 
024772 
024774 



024 776 
025004 
025006 
025014 
025016 
025016 
025022 
025026 
025032 
025034 
025036 
025042 



025046 
025046 
025052 
025054 
025054 
025054 



010067 155534 
005020 
020001 
105775 



032767 
001416 
026727 
005412 

016746 
012746 
012746 
010600 
104417 
062706 



025042 005067 



MOV R0.8MPCQP jSET THE POINTER TQ THE START QT THE QUEUE. 

14 »: CLH lRO)» i CLEAR OUT THE CONTENTS OF THE QUEUE. 

CMP RO.Rl ! CHECK IF END OF QUEUE HAS BEEN REACHED. 

BLO 14i iLOOP IF NOT ALL DONE. 

REPORT THE UNIT .DUMBER IF THE SOFTWARE P- TABLE QUESTION WAS ANSWERED 'ES. 
AND THE MAXIMUM UNIT NUMBER IS GREATER THAN I. 



000020 
155000 



155214 
005433 
000002 



000006 
155240 



155220 
000001 



BIT 
BEQ 

CMP 
BLE 
PRINTF 



•6IT4. OPTION 
16» 

L»UNIT.01 
16t 

OMTUNIT.UNITN 



s CHECK IF THE QUESTION WAS ANSWERED ^ES. 
-.SKIP REPORTING UNIT NUMBER IF IT IS DISABLED. 
;Ct«CK MAXIMUM NUMBER OF UNITS SELECTED. 
sDO NOT REPORT UNIT NUMBER IF MAX NUMBER < 1. 
: REPORT UNIT NUMBER. 

MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 



UNITN. (SP) 
•MFUNIT. (SPJ 
•2. -(SP) 

SP.no 

CJPN'F 
06. SP 



16t: 
ENOIT: 



CLR 



CTRLCF 



;CLR THE CTRL C TEST ABORT FLAG. 



SET THE PROCESSOR PRIORITY TO DISABLE ALL INTERRUPTS. 



012700 000540 
104441 



104411 
000000 



SETPRI ♦PRI07 
ENDINIT 

TNUM 0 



;SET PROCESSOR PRIORITY TO 7. 

MOV 
TRAP 



L 10021; 



TRAP 



»PRI07,R0 
C»SPRI 



C«INIT 



{INITIALIZE The ASSEMBLER TEST NLWBER VARIABLE. 



4S01 
460^ 
4905 
4004 
4905 
480€> 
480' 
4608 
480<» 
481C 
4811 
481^ 

4815 0^5056 
0^5056 

4814 
48^1 

4822 025056 
025056 

025056 104461 
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.SBTTL AuroOROP SECTION 



THIS CODE IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE ir 
THE "ADR" FLAG WAS SET. THE UNIT(S) UNDER TEST ARE CHECKED TO 
SEE IF THET WILL RESPOND. THOSE THAT DON T ARE IMMEOIATELt 
; DROPPED FROM TESTING. 



BGNAUTO 



ENOAUTO 



LIAUTO: 



L 10022: 



TRAP 



CtAtjTO 



Ji 



CZDHUBO DMU 11 KINC TST PAR'l 
AUTOOPOP SFCTION 



4651 
4632 
4633 
4834 
4635 
4836 
4837 
4838 
4839 
4840 

4641 
4850 
4851 
4852 

4853 
4854 
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.SBTTL CLEANUP COOING SECTION 



.EG 126 



( ♦ 



THE CLEANUP COOING SECTION CONTAINS THE CODING THAT IS PERFORMED 
AFTER THE HARDWARE TESTS HAVE BEEN PERFORMED. 



4855 
4867 
4868 
4869 
4870 



025060 
025060 

025060 005767 155222 
025064 001401 
025066 

025066 104433 

025070 

025070 

025070 104432 
025072 000002 



2$: 



025074 
025074 

025074 104412 



BGNCLN 



TST 
BEQ 
BRESET 



EXIT 

.EVEN 
ENOCLN 



CTRLCF 
21 



CLN 



LtCLEAN: : 

DID WE GET HERE BY CTRL-C FROM TEST? 

CTRL-C FROM TEST? NO, SKIP BUS RESET. 

YES, CLR ANY DMAS OR OUTSTANDING INTERRUPTS. 

TRAP C IRE SET 



TRAP 
.WORD 



C«EXIT 
L 10023 - 



L 10023: 



TRAP 



CICLEAN 



KiO 
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4879 
4880 
4881 
4882 
4883 
4884 
4885 
4886 
4887 



ji A a a 

4888 


0250 76 
025076 








BGNDU 


•to" I 


025076 








PRINTF ODROP.RO 




0250 76 


010046 








OedlOu 


012 74o 


025122 








025104 


01274O 


000002 








OlOoOO 










A9^1 1 9 


1 f%A^A 1 7 












UOc 70d 


AAAAA^ 

OOOOOo 








A9K V 4A 








BR EOROP 
















025122 


04D 


1 A1 


AAA 

040 


DkUP: .AbCX2/*A UNITltU6l*A 




A^d 




116 


4 4 4 

111 










AAQ 

0*t5 


4 Ail 

104 






A^CI W 

025199 


Ooo 


045 


« A4 

101 






A^C« 1£ 

OcdISo 


040 


1 AJI 

104 


122 






02514 1 


117 


120 


120 






025144 


105 


104 


040 






025147 


106 


122 


117 






025152 


115 


040 


106 






025155 


125 


122 


124 






AOCI £.A 


110 


105 


122 








040 


124 


105 








led 




111 

111 






025171 
C25I/1 


1 16 


107 


056 






045 


116 


000 




C*01 










.EVEN 


4902 


025200 








EOROP: 


4903 


025200 








EXIT DU 




025200 


000167 








025202 


000000 








4904 












4905 












4906 












4907 


025204 








ENOOU 




025204 










025204 


104453 









.SBTTL OROP UNIT SECTION 



I THE DROP-UNIT SECTION CONTAINS THE COOING THAT CAUSES A DEVICE 
: TO NO LONGER BE TESTED. 



L$OU: : 

iREPORT UNIT THAT HAS BEEN DROPPED. 

MOV 
MOV 
MOV 
MOV 
TRr.? 

'.iJD 

(BRANCH AROUND THE MESSAGE. 



L 10024: 



.WORD 
.WORD 



TRAP 



RO.-CSP) 
♦DROP. -(SP) 
♦2. (SP) 
SP.RO 
C$PNTF 
♦6.SP 



JUMP 
L10024-2- 



C»OU 



LiO 
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DROP UNIT SECTION 

4916 
4917 

4918 .SBTTL ADD UNIT SECTION 

4919 
4920 
4921 
4922 
4925 

4924 ; - 

4925 

4926 025206 BGNAU 

025206 L$AU:: 

4927 



THE ADD UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES 
TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK 
TO THE TEST CYCLE. 



INSERT ADO CODE HERE. THIS CQDI WILL BE EXECUTED AFTER 
AN "ADO" COMMAND. THE PURPOSE OF THIS CODE IS TO DO ANv 
HOUSEKEEPING THAT MAY BE NECESSARY AFTER A UNIT HAS BEEN ADDED. 
THIS SECTION IS OPTIONAL. 



4926 
4929 
4930 
4931 
4932 
4933 
4954 

4935 025206 EXIT AU 

025206 000167 .WORD JtJMP 

025210 000000 .WORD L10025 2- 

4936 
4937 

4938 .EVEN 
4939 

4940 0252 IP ENOAU 

025212 L 10025: 

025212 104452 TRAP CIAU 

4941 
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4945 
4944 

4945 
4946 
4947 
4948 
4949 
4950 
4951 
4952 
4955 
4954 
4955 
4956 
4957 

4958 
4959 
4960 
4961 
4962 
4963 
4964 
4965 
4966 
4967 
4968 
4969 
4970 
4971 
4972 
4973 
4974 
4975 
4976 
4977 
4978 
4979 
4980 
4981 
4962 
4983 
4984 
4985 
4986 
4987 
4988 
4989 
4990 
4991 
4992 
4993 
4994 
4995 
4996 
4997 
4998 



.SBTTL HARDWARE TEST 



ADRA 



025214 
025214 

025214 
025222 
025230 
025236 
025244 



025252 
025260 
025266 



025270 
025274 
025300 
025304 
025306 
025312 
025320 
025322 
025326 
025332 
025334 
025340 



025342 
025346 
025354 
025360 
025364 
025370 
025372 
025376 
025400 



000001 
012767 
012767 
012767 
012767 
012767 



016767 
012767 
005005 



016700 
012701 
004767 
103402 
052705 
042767 
OlOlOO 
016701 
004767 
103403 
052705 
000434 



012702 
016767 
016700 
012701 
004767 
103402 
052705 
010100 
016701 



{* 
I* 
»* 
* 

* 

;* 

!* 

1**4 

: - - 



- REGISTER ADDRESS TEST 

THIS TEST VERIFIES THAT THE DEVICE REGISTERS MILL RESPOND TO THE PROPER 
UNIBUS HANDSHAKING SIGNALS WHEN ACCESSED. IF THE DHUll DOES NOT RESPCMD 
TO THE ACCESS ATTEMPTS (IF THE DHUll IS AT THE WRONG ADDRESS. FOR EXAMPLE) 
THE 004 BUS TIME-OUT TRAP IS DETECTED BY THIS ROUTINE AND AN ERROR 
IS REPORTED. THIS TEST IS PERFORMED ON LINE 0 ONLY, 



000001 
177777 
000145 
005560 
015510 



152526 
024124 



155102 
155056 
156532 
156526 
156522 



155042 
152516 



BGNTST 

TNUM " 
MOV 
MOV 
MOV 
MOV 
MOV 



TNUM ♦ 1 

OTNUM.TSTNUM 

•-l.CTRLCF 

«101. .ERRNBR 

^M0103.ERRMSG 

«ER0101.ERRBLK 



Tl • • 

{INCREMENT THE ASSEMBLY TIME TEST COUNTER, 
I SET UP THE TEST NUMBER. (1) 

INDICATE THAT WE ARE IN A TEST. 

SET THE TEST ERROR NUMBER IN THE TABLE. 

SET UP THE TEST FAILURE MESSAGE IN THE TABLE, 

SET-UP THE ERROR ROUTINE IN THE ERROR TABLE. 



SET UP TO CATCH ANY 004 TRAPS WHICH OCCUR; 



MOV 4.TP4VEC 
MOV *TP4RTN.4 
CLR R5 



jSAVE THE EXISTING 004 TRAP VECTOR. 

:SET 004 TRAP VECTOR TO OUR SERVICE RTN ADR. 

; CLEAR THE ERROR FLAGS. 



HERE BEGINS THE LOOP TO TEST THE REGISTERS FOR A LINE, 

FIRST TEST THE CSR AND SET THE IND.ADR.REG (I.A.R) FIELD. 



154746 
025466 
172446 

100001 
000017 

154714 
172420 

100002 



000010 
154670 
000104 
025466 
172362 

lOOOOl 

000060 



000146 41; 



MOV 
MOV 

JSR 

BCS 
BIS 
BIC 
MOV 
MOV 

JSR 

BCS 
BIS 

BR 



CSRA.RO 
«52$.R1 
PC.CKTRAP 
4< 

«100001.R5 

#17.52$ 

Rl.RO 

CSRA.Rl 

PC.CKTRAP 

61 

«100002.RS 
40 f 



J SET UP CSR AS THE CKTRAP MOVE SOURCE. 

SET UP DESTINATION LOCATION FOR CKTPAP MOVE. 

MOVE AND CHECK FOR TRAP. 

IF NO TRAP. BYPASS ERROR. 

SET FATAL REM) ERROR FLAGS. 

CLEAR THE I.A.R FIELD OF THE CSR DATA, 

USE OLD DESTINATION FOR SOURCE OF CKTRAP MOVE. 
J SET UP CSR AS THE CKTRAP MOVE DESTINATION. 

MOVE AND CHECK FOR TRAP. 

IF NO TRAP, BYPASS ERROR. 

SET FATAL WRITE ERROR FLAGS. 
{EXIT AND REPORT FATAL ERROR. 



000110 



I ♦ 

6«; 
8»; 



10$: 



NOW, WE TEST EACH REGISTER FOR THIS LINE. 



MOV 
MOV 
MOV 
MOV 

JSR 

BCS 
BIS 
MOV 
MOV 



96. .R2 
CSRA.50$ 
50$. RO 
♦52$. Rl 
PC.CKTRAP 
10$ 

« 100001, R5 
Rl.RO 
50$. Rl 



;INIT REGISTER COUNTER TO 8. 

J INITIALIZE THE REGISTER POINTER. 

;SET UP REGISTER AS THE SOURCE FOR CKTRAP MOVE. 

J SET UP LOCAL STORAGE AS THE DES FOR CKTRAP. 

PERFORM THE MOVE. CHECK FOR TRAP. 

IF NO TRAP, BYPASS THE SETTING OF ERROR FLAGS. 

SET FATAL READ ERROR FLAGS, 
tUSE OLD DEST AS SRC FOR CKTRAP MOVE. 
sSET UP REGISTER AS THE DEST FOR CKTRAP MOVE. 
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4999 
5000 
5001 
5002 
5003 
5004 
5005 
5006 
5007 
5008 
5009 
5010 
5011 
5012 
5013 
5014 
5015 
5016 
5017 
5018 

5019 
5020 
5021 



5022 
5023 

5024 
5025 
5026 
5027 
5028 
5029 
5030 
5031 
5032 



025404 
025410 
025412 
025416 
02S4.'>2 
025426 
025430 



025432 
025440 
025442 



025444 
025444 



025446 
025446 
025452 
025454 
025460 
025460 
025462 



025464 
025466 



025470 
025474 
025474 
025474 



004767 
103402 
052705 
005267 
005267 
005302 
001351 



016767 
005705 
100012 



104460 



016700 
104451 

005067 

104444 
000402 



000000 
000000 



005067 
104401 



172342 

100002 
000042 
000036 



MACRO 111200 



12(: 



NIO 

15-I1AR 84 09:15 PAGE 100 t 

JSR PC. CK TRAP s PERFORM THE MOVE. CHECK FOR TRAP. 

BCS 12» ilF NO TRAP. BYPASS THE SETTING OF ERROR FLAGS. 

BIS ♦100002, R5 ;SET FATAL WRITE ERROR FLAGS. 

INC 50* J INCREMENT THE REGISTER 

INC sot t POINTER BY 2. 

DEC R2 ; COUNT THE REGISTER. 

BNE 8$ ;L00P TO TEST THE NEXT REGISTER ADDRESS. 



'^EQ 150 



DONE CHECKING DEVICE REGISTER ADDRESSES. 
REPORT ANY ERRORS AND EXIT. 



154664 152344 40$: 



MOV 
TST 
BPL 



TP4VEC.4 

R5 

60$ 



J RESTORE THE NORMAL 004 TRAP VECTOR. 
; CHECK THE ERROR FLAGS. 
:EXIT ROUTINE IF NO ERRORS. 



REPORT "DEVICE REGISTER ACCESS TEST FAILED" 
ERROR 



TRAP 



Ct ERROR 



154564 
154626 



OOOU UNITN 



CLR CTRLCF 
OOCLN 



BR 



60$ 



;0R0P THIS UNIT FROM FUTHER TESTING. 

MOV UNITN.RO 
TRAP CIDOOU 

i INDICATE NO CTPL-C ABORT FROM TEST. 

s ABORT THIS SUB PASS. 

TRAP C$DCLN 



LOCAL STORAGE, a**************************************** 

50t: .WORD 0 :STORAGE FOR THE SOURCE OR DEST OF THE CKTRAP MOVE. 

52$: -UORD 0 j STORAGE FOR THE SOURCE OR DEST OF THE CKTRAP MOVE. 

END *********** 



154612 



60* : CLR CTRLCF 

ENOTST 



; INDICATE THAT UE ARE NOT UITHIN A TEST. 

L 10026: 



TRAP CIETST 
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5054 
5055 
505t> 
5057 
50 5S 
505«» 
5040 
5041 



mSTA 



Bll 
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"EQ 151 



5042 
5045 
5044 

5045 



5046 
5047 
5048 
5049 
5050 
5051 
5052 
5055 
5054 
5055 
5056 
5057 
5058 
5059 
5060 
5061 
5062 

5065 
5064 
5065 
5066 
5067 
5068 
5069 
5070 
5071 
5072 
5075 
5074 
5075 
5076 
5077 
5078 
5079 
5080 
5081 
5082 
5085 
5084 
5085 
5086 



0254 76 
025476 

0254 76 
025504 
025512 
025512 
025516 
025520 
025526 
025554 



025542 
025546 
025552 
025554 
025560 
025564 



025566 
025566 
025570 
025574 
025600 
025604 



025606 
025612 
025614 
025620 
025622 
025626 
025650 
025652 
025656 
025640 



025642 
025650 
025654 



000002 
012767 
012767 

012700 
104441 

012767 
012767 
012767 



012701 
012702 
005005 
016704 
004767 
105410 



104455 

004767 
012701 
004767 
105016 



012701 
010214 
004767 
105010 
012702 
160102 
001415 
020227 
002417 
000424 



012767 
012701 



.S8TTL HARDWARE TEST 



MRSTA 



- HASTER RESET WITH SELFTEST TEST 
THIS TEST VERIFIES THAT THE MASTER RESET BIT WILL CLEAR AFTER A DEVICE 
RESET AND THE PERFORMANCE OF THE OUT ROM BASED SELFTEST. 



000002 
177777 

000240 

000001 
005616 
016042 



011610 
000040 

154462 
172400 



174550 
011610 
172560 



011610 
172544 
011610 

000764 



154620 
154574 



156240 
156256 
156252 



BGNTST 

TMUM 

MOV 

MOV 
SETPRI 



MOV 
MOV 
MOV 



TNUM . 1 
•TNUM.TSTNUM 
♦ l.CTRLCF 
•PR 105 



•l.ERRTvP 

•EM0201.ERRMSG 

•ER0201.ERRBLK 



T2: ! 
TIHE 



TEST CO'JNTER. 
(2) 

TEST. 



I INCREMENT THE ASSEMBLr 

I SET UP THE TEST NUMBER. 

I INDICATE THAT WE ARE IN A 

i ALLOW LTC INTERRUPTS. 

MOV OPRIOS.RO 
TRAP CISPHI 

iSET ERROR TYPE AS FATAL IN ERROR TABLE. 

I SET ERROR MESSAGE ADDRESS IN ERROR TABLF . 

tSET ERROR ROUTINE ADDRESS IN ERROR TABLE. 



i ♦ 

i 

t - 



t ♦ 
I 
( 
t 



WAIT UP TO 5 SECONDS FOR THE OUT MASTER RESET BIT TO CLEAR. 

MOV •5000., Rl iTIME-OUT VALUE IS 5.0 SECONDS. 

MOV •eiT05.R2 (WAITING FOR MASTER RESET BIT. 

CLR R5 I WAITING FOR BIT TO CLEAR. 

MOV CSRA.R4 iBIT IS IN THE DUTS CSR. 

JSR PC.MSLGET iWAIT FOR DUT.CSR.MR BIT TO CLEAR. 

BCS 2» I SKIP TO RESET DUT IF MR CLEAR. 

DUT MASTER RESET BIT DID NOT GO CLEAR. DEVICE MAY BE STuCK IN SOME 
ODD STATE. TRY TO RESET DEVICE WITH A BUS RESET. 



( 
s 

21: 



BRESET tNO. TRY TO JOG DEVICE UITH BUS RESET 

TRAP 

JSR PC.SKPSTS I TRY TO SKIP THE SELFTEST. 

MOV •5000.. Rl iTIME-OUT VALUE IS 5.0 SECONDS. 

JSR PC.MSLGf T iWAIT FOR DUT.CSR.MR BIT TO CLEAR. 

BCC 41 iGO REPORT ERROR IF MR BIT OIQ NOT CLEAR. 

SET THE MASTER RESET BIT AND VERIFY THAT IT CLEARS WITHIN THE PROPER TIME, 



CJRESET 



t ♦ 



I 



•10V 
MOV 
JSR 
BCC 
MOV 
SUB 
BEQ 
CMP 
BLT 
BR 

ERROR REPORTS: 



•5000. .Rl 
R2.(R4) 
PC.MSLGET 
41 

•5000. ,R2 
RI.R2 
6> 

R2,»500. 
8t 
60 « 



000511 
005651 



156120 



{REPORT MR BIT WOULD NOT 
41: MOV •201.,ERRNBR 

MOV •EM0202.RI 
ERROR 



I TIME -OUT VALUE IS 5.0 SECONDS. 

iSET THE DUT MASTER RESET BIT. 

iWAIT FOR DUT.CSR.MR BIT TO CLEAR. 

iGO REPORT ERROR IF MR BIT DID NOT CLEAR. 

I CALCULATE • OF MS FOR MR TO CLEAR. 

iGO REPORT ERROR IF HR CLEAR IMMEDIATELY. 

iGO REPORT ERROR IF MR CLEAR IN ' I'i SECOND, 
lEXlY THE TEST WITHOUT ERROR. 



CLEAR AFTER A OUT RESET. 

I SET THE ErBOR NUMBER IN ERROR TABlE. 
I SELECT ERROR MESSAGE. 

, REPORT ERROR. ERROR »20l 
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1S2 



508 7 
5088 
5089 
5090 
5091 
509;r 

5095 
5094 
5095 
5096 
5097 
5096 

5099 
5100 



5101 
5102 



025*54 
025656 



025660 
025666 
025672 
025672 
025674 



025676 
025704 
025710 
025710 

025712 
025712 
025716 
025720 
0.?5724 
025724 
025724 



104460 
000415 



012767 0OOS12 156102 6«i 
012701 006024 

104460 
000406 



012767 000313 156064 61: 
012701 006167 



104460 



012700 000540 
104441 

005067 154562 



104401 



601 i 



BR 

i REPORT HR 
MOV 
MOV 
ERROR 

BR 

iREPORT MR 
MOV 
MOV 
ERROR 



SETPRI 



CLR 
ENOTST 



60 1 



lEXlT THE TEST. 



TRAP 



CIERROR 



BIT CLEAR IMMEDIATELY AFTER OUT RESET. 
«20?..ERRNBR iSET THE ERROR NUMBER IN ERROR TABLE. 
•EM0205.R1 t SELECT ERROR MESSAGE. 

{REPORT ERROR. >>>>> ERROR •202 *<<<< 

TRAP C«ERR0R 

60» {EXIT THE TEST, 

CLEAR WITHIN 1/2 SECOND OF OUT RESET. 
•203..ERRNBR iSET THE ERROR NUMBER IN ERROR TABLE. 



«£H0204,R1 

•PR 10 7 
CTRLCF 



(SELECT ERROR MESSAGE. 
{REPORT ERROR. 



> > > > > ERROR »205 * < < < < 



TRAP 



{DISABLE ALL INTERRUPTS. 

MOV 
TRAP 

(INDICATE THAT UE COMPLETED THE TEST. 



L10O27: 



TRAP 



CIERROR 



•PRI07.R0 
CISPRI 



CIETST 



DJ L 
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S104 
5105 
5106 
5107 
5108 
5109 
51 10 
5111 

5112 
511S 
5114 
5115 



5116 
5117 

5iia 

5119 
5120 
5121 
5122 
5123 
5124 
5125 
5126 
5127 
5126 
5129 
5130 
5131 
5132 

5133 
5134 
5135 
5136 
5137 
5136 
5139 
5140 
5141 
5142 
5143 
5144 
5145 
5146 
5147 
5146 
5149 
5150 
5151 
5152 
5153 
5154 
5155 
5156 



025726 
025726 

025726 
025734 
025742 
025742 
025746 
025750 
025756 
025764 



025772 
025776 
026002 
026004 
026010 
026014 



026016 
026016 
026020 
026024 
026030 
026034 



026036 
026042 
026044 
026050 
026054 
026056 
026062 
026064 
026070 
026072 



026074 
026100 
026104 



000003 
012767 
012767 

012700 
104441 

012767 
012767 
012767 



012701 
012702 
005003 
016704 
004767 
1C3410 



104433 

004767 
012701 
004767 
103024 



012701 
010214 
004767 
004767 
105007 
012702 
160102 
020227 
002415 
000431 



012701 
004767 
103416 



000005 

177777 

000240 

000001 
006346 
016042 



011610 
000040 

154232 
172150 



174320 
011610 
172130 



000310 

174274 

172110 

000310 
000012 



011300 
172060 



154370 
154544 



156010 
156006 
156002 



.SeTTL HARDWARE TEST 



HRS3TA 



!• 

I* 
I* 
!• 

i - - 



• MASTER RESET WITH SKIP SEtrTEST TEST 
THIS TEST VERIFIES THAT THE MASTER RESET BIT UILL CLEAR AFTER A DEVICE 
RESET AND THE SKIPPING OF THE OUT ROM BASED SEL.FTEST. 



BGNTST 

TNUM 

MOV 

MOV 
SETPRI 



MOV 
MOV 
MOV 



TNUM » 1 
•TNUM.TSTNUM 
•-1.CTRLCF 
0PRI05 



•l.ERRTYP 

•EM0301.ERRMSG 

«ER0201,ERRBLK 



T3:: 

J INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
iSP.T UP THE TEST NUMBER. (3) 
{INDICATE THAT UE ARE IN A TEST, 
i ALLOW LTC INTERRUPTS. 

MOV •PRIOb.RO 
TRAP CISPRI 

I SET ERROR TYPE AS FATAL IN ERROR TABLE. 

iSET ERROR hESSAGE ADDRESS IN ERROR TABLE. 

I SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 



!*WAIT UP TO 
i - 

MOV 
MOV 
CLR 
MOV 
JSR 
BCS 



5 SECONDS FOR THE OUT MASTER RESET BIT TO CLEAR. 

«5000..R1 iTIME-OUT VALUE IS 5.0 SECONDS. 

#eiT05,R2 {WAITING FOR MASTER RESET BIT. 

RS {WAITING FOR BIT TO CLEAR. 

CSRA.R4 {BIT IS IN THE DUT'S CSR. 

PC.MSLGET {WAIT FOR DUT_CSP_MR BIT TO CLEAR. 

2« I SKIP TO RESET OUT IF MR CLEAR. 



OUT MASTER RESET BIT DID NOT GO CLEAR. DEVICE MAY BE STUCK IN SOME 
000 STATE. TRY TO RESET DEVICE WITH A BUS RESET. 



BRESET 

JSR 

MOV 
JSR 

BCC 



PC.SKPSTS 
♦5000..R1 
PC.MSLGET 
61 



I SET THE MASTER RESET BIT. 
t MR BIT CLEARS WITHIN 1/5 
( - 
2t: 



MOV 
MOV 

JSR 

JSR 

BCC 
MOV 
SUB 
CMP 

BLT 
BR 



•200.. Rl 
R2.(R4) 
PC.SKPSTS 
PC.MSLGET 
41 

«200..R2 

R1.R2 

R2.«10. 

ai 

60 1 



(NO. TRY TO JOG DEVICE WITH BUS RESET 

TRAP 

,TRY TO SKIP THE SELFTEST. 
(TIME-OUT VALUE IS 5.0 SECONDS. 
(WAIT FOR OUT .CSR .MR BIT TO CLEAR. 
(GO REPORT ERROR IF MR BIT DID NOT CLEAR. 

TRY TO SKIP THE SELFTEST. AND VERIFY THAT THE 
SECOND. 

(TIME-OUT VALUE IS 1/5 SECOND. 

(SET THE OUT MASTER RESET BIT. 

(TRY TO SKIP THE SELFTEST. 

(WAIT FOR OUT. CSR MR BIT TO CLEAR. 

(GO FIND OUT W«MAT IS WRONG IF MR NOT CLEAR. 

(CALCULATE » OF MS FOR MR TO CLEAR. 

(GO REPORT ERROR IF MR CLEAR IN < 10 MS. 
(EXIT THE TEST WITHOUT ERROO. 



C (RESET 



( MR DID NOT CLEAR WITHIN 1/5 SECOND. SEE IF IT CLEARS WITHIN 5 SECONDS. 

41: MOV «4800..R1 (TIME OUT VALUE IS 5 SECONDS MINUS I 5 SECOND. 

JSR PC.MSLGET (WAIT FQR DUT.CSR.MR BIT TO CLEAR. 

BCS 101 (GO REPORT ERROR IF MR CLEARED FINALS, 
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5157 
5156 
5159 
5160 
5161 
5162 
5163 

5164 
5165 
5166 
5167 
S16S 
5169 

5170 
5171 
5172 
517S 
5174 
5175 

5176 
5177 



51 7S 
5179 



026106 
326114 
026120 
026120 
026122 



026124 
026132 
026136 
026136 
026140 



026142 
026150 
026154 
026154 

026156 
026156 
026162 
026164 
026170 
026170 
026170 



012767 000455 
012 7'* 1 005651 

104460 
000415 



012767 
012701 

104460 
000406 



012767 
012701 

104460 



012700 
104441 
005067 



104401 



000456 
006420 



000457 
006560 



000340 
154116 



i ERROR REPORTS: 

« 

jREPORT MR BIT UOUlO NOT CLEAR AFTER A OUT RESET. 
155654 6»: MOV ACSOl. .ERRhfiR tSET THE ERROR NUMBER IN ERROR TABLE. 

MOV •eM0202.Hl jSELECI ERROR MESSAGE. 

ERROR {REPORT ERROR. >>>>> ERROR OOSOl <<<<< 

TRAP CIERROR 

BR 60» tEXIT THE TEST. 

tREPORT MR BIT CLEAR WITHIN 10 MS AFTER OUT RESET. 
155636 8«: MOV 90302 ., ERRNBR iSET THE ERROR NUMBER IN ERROR TABLE. 

MOV «EM0302.R1 {SELECT ERPOR MESSAGE. 

ERROR (REPORT ERROR. >>>>> ERROR «0302 <<<<< 

TRAP CSERROR 

BR 60> (EXIT THE TEST. 

(RcPORT MR CLEARED BETWEEN 1/5 SECOND AND 5 SECONDS OF OUT RESET. 
155620 10»: MOV ^303..ERRNBR (SET THE ERROR NUMBER IN ERROR TABLF. 



MOV 
ERROR 



•EM0303.R1 



(SELECT ERROR MESSAGE. 
{REPORT ERROR. 



>>>>> ERROR 4^0303 <<<<< 



TRAP 



601: 



SETPRI «PRI07 



CLR 
ENOTST 



CTRLCF 



{DISABLE ALL INTERRUPTS. 

MOV 
TRAP 

(INDICATE THAT WE COMPLETED THE TEST. 



L10030: 



TRAP 



CIERROR 



#PPI07,R0 
CtSPRl 



C*ETST 



'FJ 154 
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HARDUARt TEST 



5101 
5182 
5183 
5184 
5185 
5186 
5187 
5188 
5189 



RXCHRA 



^EQ 135 



5190 



5191 
5192 
5193 
5194 
5195 
5196 
5107 
5198 
5199 
5200 
5201 
5202 
5203 
5204 
5205 
5206 
5207 
5208 
5209 
5210 
5211 
5212 
5213 
5214 
5215 
5216 
5217 
5218 
5219 
5220 
5221 
5222 
5223 
5224 
5225 
5226 
5227 
522S 
5229 
5230 

5231 
5232 
5233 



026172 
026172 
026172 
026172 
026176 

026200 
026206 
026214 
026222 
026230 



026236 
026242 
026246 
026250 
026254 
026256 
026262 
026266 



026270 
026272 
026276 
026300 
026302 
026306 
026312 
026314 
026316 
026320 



026322 
026330 
026334 
026334 
026336 



012700 
104441 
000004 
012767 
012767 
012767 
012767 
012767 



012701 
012702 
005003 
016704 
010214 
004767 
004767 
103015 



012400 
012701 
011402 
010200 
042700 
020027 
001012 
005301 
001367 
000415 



012767 
012701 

104460 
000406 



.SBTTL HARDWARE TEST 



RXCHRA 



«♦ 
* 



- RBUF REGISTER RX CHARACTER FIELD TEST 
THIS TEST VERIFIES THAT THE RX CHARACTER FIELD OF THE DUT RBUF REGISTER 
APPEARS TO BE FUNCTIONING CORRECTLY. THIS TEST USES THE COOES WHICH 
SHOULD BE IN THE FIFO AFTER A BOARD RESET AND SKIP SELFTEST SEQUENCE. 



000240 



000004 
177777 
000001 
006737 
016042 



011610 
000040 

153766 

174062 
171676 



154116 
154072 
155544 
155542 
155536 



BGNTST 
SETPRI 



TNUH 

MOV 

MOV 

MOV 

MOV 

MOV 



«PRI05 



■ TNUM ♦ 1 
♦TNUM.TSTNUM 
♦-I.CTRLCF 
♦l.ERRTYP 
•EM0401.ERRMSG 
«ER0201.ERRBLK 



T4 : • 

I ALLOW LTC INTERRUPTS. 

MOV ♦PRIOS.RO 
TRAP C«SMRI 

I INCREMENT THE ASSEMBLY TIME TEST C00N1E«». 

iSET UP THE TEST NLTBER. C4) 

(INDICATE THAT WE ARE WITHIN A TEST. 

iSET ERROR TYPE AS FATAL IN ERROR TABLE. 

;SEr ERROR MESSAGE ADDRESS IN ERROR TABLE. 

(SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 



; SET THE DUT CSR MASTER RESET (MR) BIT, PERFORM THE SKIP SELFTEST SEQUENCE, 
: AND WAIT UP TO 5 SECONDS FOR THE MR BIT TO CLEAR. 



t - 



MOV ♦5000. .Rl ;TIME OUT VALUF IS 5.0 SECONDS. 

MOV «6IT05.R2 ; WAITING FOR MASTER RESET BIT. 

CLR R3 J WAITING FOR BIT TO CLEAR. 

MOV CSRA.R4 jBIT IS IN THE OUT'S CSR. 

MOV R2.CR4) J SET THE DUT MASTER RESET BIT. 

JSR PC.SKPSTS aSKIP THE SELFTEST. 

JSR PC.MSLGET iWAIT FOR DUT. CSR MR BIT TO CLEAR. 

BCC 4* tGO REPORT ERROR IF MR DID NOT CLEAR. 

READ 6 CHARACTERS FROM THE DUT AND VERIFY THAT THEY ARE VALID SELFTEST 
COOES. 



000006 



177476 
000201 



MOV 
MOV 

2$: MOV 
MOV 
BIC 
CMP 
BNE 

DEC 
BNE 
BR 



CR4V.R0 

#6,R1 

(R4).R2 

R2.R0 

♦177476. RO 

R0.«201 

6» 

Rl 

2t 

60 1 



{INCREMENT POINTER TO POINT TO DUT RBUF REGSTR. 

{INITIALIZE THE LOOP COUNTER. 

iREAD A CHARACTER FROM THE DUT RBUF REGISTER. 

{REMOVE ALL BUT BITS SPECIFIC TO SELFTEST CODE. 

{CHECK THAT BITS 0.6. AND 7 ARE CORRECT. 

{GO REPORT ERROR IF CODE IS NOT SELFTEST CODE. 

{COUNT THIS LOOP ITERATION. 

{LOOP IF NOT ALL LINES DONE. 

{EXIT TEST. NO ERROR FOUND. 



ERROR REPORTS: 



000621 
005651 



{REPORT MR BIT WOULD NOT CLEAR AFTER A OUT RESET. 
155440 4*: MOV «0401 . .ERRNBR {SET THE ERROR NUMBER IN ERROR TABLE. 

MOV «EM0202.R1 {SELECT ERROR MESSAGE. 

ERROR {REPORT ERROR. >>>>* ERROR #0401 

TRAP ClERROfi 

BR 60( {EXIT THE TEST. 

{REPORT IMPROPER CODE F 0U»:D IN DUT RBUF AFTER RESET (SKIP SELFTEST). 



Gil 



5254 026540 012767 000622 155422 6*: 

5255 026546 012701 007015 

5256 026552 
026552 104460 

5257 

5250 026554 60»i 

026554 012/00 000540 

026560 104441 
5259 026562 005067 155720 
5240 026566 

026566 

026566 104401 



MOV 

nov 

ERROR 



«0402. .ERRNBR 
«En0402.Rl 



SETPRI JPRI07 



CLR CTRLCr 
ENDTST 



;SET THE ERROR NiJMBER IN ERROR TABLE. 
! SELECT ERROR MESSAGE. 

sREPORT ERROR. >>»>» ERROR #0402 <<<<< 

TRAP CIERROR 



jOISABLE all INTERRUPTS. 

MOV 
TRAP 

! INDICATE THAT UE COMPLETED THE TEST. 



L 10051; 



TRAP 



•PRI07,R0 
C»SPRI 



CtETST 



^tO 15^ 



Hii 
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5245 
524 S 
5244 
5245 
5246 
5247 
524S 
524<» 
5250 

5251 



5252 
5255 
5254 
525b 
5256 
5257 
5258 
S2S9 
5260 
5261 
5262 
5263 
5264 
5265 
5266 
5267 
5260 
5269 
5270 
5271 
5272 
5273 
5274 
5275 
5276 
5277 
5278 
5279 
5280 
5281 
5282 
5283 
5284 
5285 
5286 
5287 
5288 
5289 
5290 

5291 
5292 
5293 
5294 



026370 
026S70 
026370 
026370 
026374 

026376 
026404 
026412 
026420 
026426 



026434 
026440 
026444 
026446 
026452 
026454 
026460 
026464 



026466 
026470 
026474 
026476 
026502 
026504 
026506 
026510 
026512 



026514 
c .6522 
026526 
026526 
026530 



012700 
104441 

000005 
012767 
012767 
01276? 
012767 
012/67 



012701 
012702 
005003 
016704 
010214 
004767 
004767 
103013 



012400 
012701 
011402 
012700 
040200 
001012 
005301 
001371 
000415 



012767 
012701 

104460 

000406 



SBTTL HARDWARE TEST 



RXFFOA 



RBUF REGISTER RX FLAG FIELD TEST - 
THIS TEST VERIFIES THAT THE FIELD OF 3 TLAG BITS IN THE RBUF READS 
AS ALL ONES UHEN THE SELF TEST CODES ARE BEING READ FROM THE DUT 
AFTER A BOARD RESET AND SKIP SELF TEST SEQUENCE. 



000240 



000005 
177777 
000001 
007165 
016042 



011610 
000040 

153570 

173664 
171500 



000010 
070000 



000765 
005651 



153720 
153674 
155346 
155344 
155340 



BGNTST 
SETPRI 



TNUM 

MOV 

MOV 

MOV 

MOV 

MOV 



♦PRI05 



• TNUM » 1 
♦TNUM.TSTNUM 
♦-l.CTRLCF 
♦l.ERRTYP 
•EN0501.ERRMSG 
«ER0201,ERRBLK 



T5:: 

s ALLOW LTC INTERRUPTS. 

MOV »PRI05.R0 
TRAP C$SPRI 

I INCREMENT THE ASSEMBLr TIME TEST COUNTER, 

jSET UP THE TEST NUMBER. (5) 

(INDICATE THAT UE ARE UITHIN A TEST. 

I SET ERROR TYPE AS FATAL IN ERROR TABLE. 

tSET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

iSET ERROR R0UTir« ADDRESS IN ERROR TABLE. 



IsET THE DUT CSR MASTER RESET (MR) BIT. PERFORM THE SKIP SELFTEST SEQUENCE. 
i AND WAIT UP TO 5 SECONDS FOR THE MR BIT TO CLEAR. 

MOV «5000..R1 s TIME -OUT VALUE IS 5.0 SECONDS. 

MOV «BIT05.R2 :UAITING FOR MASTER RESET BIT 

CLR R3 :UAITING FOR BIT TO CLEAR. 

MOV CSRA.R4 ,BIT IS IN THE OUT'S CSR. 

MOV R2.(R4) {SET THE DUT MASTER RESET BIT. 

JSR PC.SKPSTS iSKIP THE SELFTEST. 

JSR PC.MSLGET ;WAIT FOR DUT. CSR .MR BIT TO CLEAR, 

BCC 41 iGO REPORT ERROR IF MR DID NOT CLEAR. 

i READ 8 CHARACTERS FROM THE OUT AND VERIFY THAT ALL 3 RX ERROR FLAGS ARE 
: SET FOR EACH CHARACTERS. 



MOV 
MOV 

2t: MOV 
MOV 
BIC 
BNE 

DEC 
BNE 
BR 



(R4)*.R0 

•8..R1 

(R4).R2 

«70000,RO 

R2.R0 

61 

Rl 

2* 

60$ 



; INCREMENT POINTER TO POINT TO OUT RBUF REGSTR. 

i INITIALIZE THE LOOP COUNTER. 

(READ A CHARACTER FROM THE DUT RBUF REGISTER. 

: CALCULATE BIT MAP OF CLEAR RX ERROR FLAGS. 
iGO REPORT ERROR IF NOT ALL RX ERROR FLAGS SET. 
i COUNT THIS LOOP ITERATION. 
{LOOP IF NOT ALL LINES DONE. 
jEXIT TEST. NO ERROR FOUND. 



ERROR REPORTS: 



i - 



155246 4t: 



: REPORT MR BIT WOULD NOT CLEAR AFTER A DUT RESET. 



MOV 
MOV 
ERROR 

BR 



«0501. .ERRNBR 
•EM0202.R1 



60 1 



iSET THE ERROR NUMBER IN ERROR TABLE 
I SELECT ERROR MESSAGE 
(REPORT ERROR. 



(EXIT THE TEST. 



>»»»> ERROR M501 <«<»< 
TRAP CtERROR 



026532 012767 000766 155230 6Si 



{REPORT ONE OR MORE RX ERROR FLAGS FOUND CLEAR WITH SELFTEST CODE. 
MOV «0502. .ERRNBR tSFT THE ERROR NUMBER IN ERROR TABLE. 



IIL 
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5^95 026540 012701 007241 
52<>6 026544 

026544 104460 

5297 

529S 026546 

026546 012700 000340 
026552 104441 

5299 026554 005067 15S526 

5300 026560 
026560 

026560 104401 



MOV «EM0502.R1 
ERROR 



60* : SETPRI #PRI07 



CLR CTRLCf 
ENDTST 



: SELECT ERROR MESSAGE. 

{REPORT ERROR. >>>>> ERROR «0502 <<<<< 

TRAP CtERROR 



J DISABLE ALL INTERRUPTS. 

MOV 
TRAP 

! INDICATE THAT WE COMPLETED THE TEST, 



L 10032: 



TRAP 



«PRI07.R0 
C»SPRI 



CIETST 



"^EO 1S8 



czDHoeo OHu n fuNC 

HAROWARf TEST 



5502 
5305 
55v4 
5505 
5506 
5507 
5508 
5509 
5510 



TST PARTI 
RDAA 
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5511 



5512 
5513 
5514 
5515 
5516 
5517 
5518 
5519 
5320 
5321 
5322 
5323 
5324 
5325 
5326 
5327 
5328 
5329 
5350 
5331 
5332 
5333 
5334 
5335 
5336 
5337 
5338 
5339 
5340 
5341 
5342 
5343 
5344 
5345 
5346 
5347 
5348 
5349 
5350 
5351 
5352 
5353 
5354 



026562 
026562 
026562 
026562 
026566 

026570 
026576 
026604 
026612 
026620 



026626 
026632 
026636 
026640 
026644 
026646 
026652 
026656 



026660 
026664 



026666 
026672 
026674 
026676 
026700 
026704 
026706 
026710 
026712 



026714 
026722 
026726 
026726 



012700 
104441 

000006 
012767 
012767 
012767 
012767 
012767 



012701 
012702 
005003 
016704 
010214 
004767 
004767 
10301.6 



032714 
001422 



012705 
010403 
012300 
011300 
032714 
001427 
005305 
001372 
000416 



012767 
012701 

104460 



.SB TIL HARDWARE TEST 



RDAA 



CSR RX DATA AVAILABLE BIT TEST 
THIS TEST VERIFIES THAT THE DUT CSR RX DATA AVAILABLE BIT IS SET Bt THE 
INCLUSION OF THE SELFTEST CODES IN THE DUT FIFO AND THAT THE BIT CLEARS 
AFTER THE FIFO HAS BEEN EMPTIED. 



000240 



000006 
177777 
000001 
007575 
016042 



011610 
000040 

153376 

173472 
171306 



000200 



001130 



000200 



153526 
153502 
155154 
155152 
155146 



BGNTST 
SETPRI 



TNUM 

MOV 

MOV 

MOV 

MOV 

MOV 



•PRI05 



• TNUM ♦ I 
♦TNUM.TSTNUM 
•-1.CTRLCF 
♦l.ERRTYP 
*EM0601,ERRMSG 
«ER0201.ERRBLK 



T6- • 

S ALLOW LTC INTERRUPTS. 

MOV «PRI0S.R0 
TRAP CtSPRI 

J INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

jSET UP THE TEST NUMBER. (6) 

{INDICATE THAT WE ARE WITHIN A TEST. 

;SET ERROR TYPE AS FATAL IN ERROR TABLE. 

iSET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

iSET ERROR ROUTINE ADDRESS IN ERROR TABLE. 



SET THE OUT CSR MASTER RESET (MR) BIT. PERFORM THE SKIP SELFTEST SEQUENCE. 
AND WAIT UP TO 5 SECONDS FOR THE MR BIT TO CLEAR. 

MOV «S000..R1 sTIME OUT VALUE IS 5.0 SECONDS. 

MOV •BIT05,R2 ;WAITING FOR MASTER RESET BIT. 

CLR R3 {WAITING FOR BIT TO CLEAR. 

MOV CSRA.R4 jBIT IS IN THE OUT'S CSR. 

MOV R2.(R4) {SET THE DUT MASTER RESET BIT. 

JSR PC.SKPSTS {SKIP THE SELFTEST. 

JSR PC.MSLGET {WAIT FOR DUT.CSR.MR BIT TO CLEAR. 

BCC 4$ (GO REPORT ERROR IF MR DID NOT CLEAR. 

CHECK THAT THE RX DATA AvATL/«LE BIT IS SET. 

BIT #8117. (R4) {TEST THE DUT RX. DATA, AVAIL BIT. 

BEQ 6$ :G0 REPORT ERROR IF BIT IS NOT SET. 



001131 
005651 



! READ CHARACTERS FROM THE OUT RX FIFO AND WAIT FOR RX. DATA. AVAIL TO GO CLEAR. 

{ALLOW READING 600 CHARS BEFORE ERROR. 

{CALCULATE THE RBUF ADDRESS. 
2»: MOV (R5).R0 {READ A CHARACTER FROM THE RX FIFO. 

{TEST THE OUT RX. DATA. AVAIL BIT. 
{EXIT TEST WITHOUT ERROR IF RX. DATA. AVAIL ClR. 
{COUNT THE CHARACTER JUST READ. 
{LOOP IF NOT TOO MANY CHARS READ FROM FIFO. 
{GO REPORT ERROR IF RX. DATA. AVAIL WOULON T CLR. 

'error REPORTS: 

{REPORT MR BIT WOULD NOT CLEAR AFTER A OUT RESET. 
155046 4$: MOV «0601 . .ERRNBR {SET THE ERROR NUMBER IN ERROR TABLE. 

MOV «EM0202.R1 {SELECT ERROR MESSAGE. 

ERROR {REPORT ERROR. >>>>> ERROR *0601 

TRAP CtERROR 



MOV 


«600. .R5 


MOV 


R4.R3 


MOV 


(R3)».R0 


MOV 


(R5).R0 


BIT 


•BIT7.(R4) 


BEQ 


60) 


DEC 


R5 


BNE 


2* 


BR 


8« 



CZOHOBO OHU 11 mNC TST PARTI 
HAROUARE TEST ROAA 



5555 
5356 
5557 
5358 
5559 
5360 

5361 
5362 
5563 
5364 
5365 
5366 

5367 
5568 



5569 
5370 



026730 000415 



026752 
026740 
026744 
026744 
026746 



026750 
026756 
026762 
026762 

026764 
026764 
026770 
026772 
026776 
026776 
026776 



012767 001152 
012701 007637 

104460 
000406 



012767 001135 
012701 010017 

104460 



012700 000340 
104441 

005067 153310 



104401 
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153030 6$ I 



155012 6t, 



60$; 



BR 



60$ 



I EXIT THE TEST. 



;REPORT THAT RX. DATA. AVAIL BIT UAS NOT SET AFTER A RESET COMPLETION. 
MOV «0602. .ERRNBR ;SET THE ERROR NUr«ER IN ERROR TABLE. 
MOV «€M0602,R1 (SELECT ERROR MESSAGE. 

ERROR (REPORT ERROR. >>>>> ERROR «0602 <<<<* 

TRAP CtERROR 

BR 60$ (EXIT THE TEST. 

(REPORT THAT RX, DATA. AVAIL BIT COULD NOT BE CLEARED BY PURGING FIFO. 
MOV «0603. .ERRNBR (SET THE ERROR NUMBER IN ERROR TABLE. 



MOV 
ERROR 



*EM0605.R1 



(SELECT ERROR MESSAGE. 
(REPORT ERROR. 



>>>>> ERROR 00605 <<<<< 



TRAP 



SETPRI »PRI07 



CLR 
ENOTST 



CTRLCF 



.DISABLE ALL INTERRUPTS. 

MOV 
TRAP 

(INDICATE THAT UE COMPLETED THE TEST, 



L 10033: 



TRAP 



C»ERR0R 



*PRI07.R0 
CISPRI 



C»ETST 



<^EQ 140 
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5572 
5373 
5374 
5375 
5376 
5377 
5378 
5379 
5380 

5361 



5382 
5383 
5384 
5385 
53S6 
5387 
5388 
5389 
5390 
5391 
5392 
5393 
5394 
5595 
5396 
5397 
5398 
5599 
5400 
5401 
5402 
5403 
5404 
5405 
5406 
5407 
5406 
5409 
5410 
5411 
5412 
5413 
5414 
5415 
5416 
5417 
5418 
5419 
5420 
5421 
5422 

5423 
5424 



027000 
027000 
027000 
027000 
027004 

027006 
027014 
027022 
027030 
027036 



027044 
027050 
027054 
027056 
027062 
027064 
027070 
027074 



027076 
027100 
027102 



027104 
027110 
027112 
027114 
027116 
027120 



027122 
027130 
027134 
027134 
027136 



.SBTTL HARDWARE TEST 



ROVA - 



;* 

8* 

;* 
s* 
:* 



- RBUF RX DATA VALID BIT TEST - 
THIS TEST VERIFIES THAT THE OUT RBUF RX DATA VALID BIT IS SET BY THE 
INCLUSION OF THE SELFTEST COOES IN THE OUT FIFO AND THAT THE BIT CLEARS 
AFTER THE FIFO HAS BEEN EMPTIED. 



012700 000240 

104441 

000007 

012767 000007 

012767 177777 

012767 OOOOOl 

012767 010202 

012767 016042 



012701 011610 

012702 000040 
005003 

016704 153160 
010214 

004767 173254 
004767 171070 
103012 



153310 
153264 
154736 
154734 
154730 



BGNTST 
SETPRI 



TNUM 

MOV 

MOV 

MDV 

MOV 

MOV 



♦PR 105 



• TNUM » 1 
#TNUM.TSTNUM 
#-l.CTRLCF 
♦l.ERRTYP 
«eM0701,eRRMSG 
«£R0201.ERRBLK 



T7 • • 

sALLOU LTC INTERRUPTS. 

MOV ♦PRI05.R0 
TRAP C»SPRI 

J INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

jSET UP THE TEST NUMBER. C7) 

t INDICATE THAT UE ARE WITHIN A TEST. 

sSET ERROR TYPE AS FATAL IN ERROR TABLE. 

:SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 



SET THE OUT CSR MASTER RESET CMR) BIT, PERFORM THE SKIP SELFTEST SEQUENCE. 
AND WAIT UP TO 5 SECONDS FOR THE MR BIT TO CLEAR. 



MOV 
MOV 
CLR 
MOV 
MOV 
JSR 
JSR 
BCC 



#5000. ,Rl 
#6IT05.R2 
R3 

CSRA.R4 

R2.CR4) 

PC.SKPSTS 

PC.MSLGET 

4t 



TIME-OUT VALUE IS 5.0 SECONDS. 

WAITING FOR MASTER RESET BIT. 

WAITING FOR BIT TO CLEAR. 
jBIT IS IN THE OUT'S CSR. 
8 SET THE OUT MASTER RESET BIT. 
J SKIP THE SELFTEST. 
8 WAIT FOR OUT CSR MR BIT TO CLEAR. 
iGO REPORT ERROR IF MR DID NOT CLEAR. 



J CHECK THAT THE RX DATA VALID BIT IS SET. 



012400 
005714 
100016 



012705 001130 

011400 

100027 

005305 

001374 

000416 



012767 001275 
012701 005651 

104460 
000415 



MOV 

TST 
BPL 



(R4)*.R0 

(R4) 

6$ 



INCREMENT POINTER TO PNT TO OUT RBUF REG. 
TEST THE OUT RX. DATA. VALID BIT. 
GO REPORT ERROR IF BIT IS NOT SET. 



READ CHARACTERS FROM THE OUT RX FIFO AND WAIT FOR RX. DATA. VALID TO GO CLEAR. 



I - 
2): 



MOV 


«600. .R5 


MOV 


(R4).R0 


BPL 


60 ( 


DEC 


R5 


BNE 


2» 


BR 


8t 



: ALLOW READING 600 CHARS BEFORE ERROR. 

jREAD A CHARACTER FROM THE RX FIFO. 

jEXIT TEST WITHOUT ERROR IF BIT IS CLEAR. 

J COUNT THE CHARACTER JUST READ. 

jLOOP IF NOT TOO MANY CHARS READ FROM FIFO. 

:G0 REPORT ERROR IF RX. DATA. VALID WOULDN'T CLR. 



s ERROR REPORTS; 



154640 4$: 



sREPORT MR BIT WOULD NOT CLEAR AFTER A OUT RESET. 



MOV 
MOV 
ERROR 

BR 



«0701 . . ERRN6R 
«£M0202.R1 



601 



(SET THE ERROR NUMBER IN ERROR TABLE. 
8 SELECT ERROR MESSAGE. 

;REPORT ERROR. >>>>> ERROR 00701 «<*«< 

TRAP CtERROR 

jEXIT THE TEST. 



5425 
5426 
5427 
5420 

5429 
5450 
5431 
5432 
5453 
5434 

5435 
5436 



5437 
543a 



027140 
027146 
027152 
027152 
027154 



027156 
027164 
027170 
027170 

027172 
027172 
027176 
027200 
027204 
027204 
027204 



012767 
012701 

104460 
000406 



012767 
012701 

104460 



012700 
104441 
005067 



104401 



001276 
010245 



001277 
010425 



000340 
153102 
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154622 6$: 



sREPORT THAT RX. DATA. VALID BIT WAS NOT SET AFTER A RESET COMPLETION. 



MOV 
MOV 
ERROR 

BR 



«0702. .ERRNBR 
«EM0702.R1 



60$ 



iSET THE ERROR NUMBER IN ERROR TABLE, 
s SELECT ERROR MESSAGE. 
(REPORT ERROR. >>>>> ERROR 00702 <<<<< 

TRAP C f ERROR 

jEXIT THE TEST. 



{REPORT THAT RX. DATA. VALID BIT COULD NOT BE CLEARED BY PURGING FIFO. 
154604 8$: MOV «0703 .. ERRNBR ;SET THE ERROR NUMBER IN ERROR TABLE. 

MOV »eM0703.Rl (SELECT ERROR MESSAGE. 

ERROR (REPORT ERROR. >>>>> ERROR «0703 <<<<< 

TRAP C TERROR 



60»: SETPRI OPRI07 



CLR CTRLCF 
ENOTST 



(DISABLE ALL INTERRUPTS. 

MOV 
TRAP 

(INDICATE THAT UE COMPLETED THE TEST. 



L 10034: 



TRAP 



0PRI07.R0 
C»SPRI 



C»ETST 



CZDMUBO OHU 11 mWC TST PARTI 
TEST 
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5440 
5441 
544^ 
5445 
5444 
5445 
5446 
5447 
5448 

5449 



5450 
5451 
5452 
5453 
5454 
5455 
5456 
5457 
5458 
5459 
5460 
5461 
5462 
5463 
5464 
5465 
5466 
5467 
5466 
5469 
5470 
5471 
5472 
5473 
5474 
5475 
5476 
5477 
5478 
5479 
5460 
5481 
5482 
5483 
5464 
5485 
5486 
5487 
5488 
5489 
5490 
5491 
5492 



0P7206 
027206 
027206 
027206 
027212 

027214 
027222 
027230 
027236 



027244 
027250 
027254 
027256 
027262 
027264 
027270 
027274 



027276 
027300 
027302 
027304 
027306 
027310 
027314 
027316 
027320 
027322 
027326 
027330 



027332 
027340 
027346 
027352 
027352 



012700 000240 

104441 

000010 

012767 000010 

012767 177777 

012767 000001 

012767 010610 



153102 
153056 
154530 
154526 



.SBTTL HARDWARE TEST - RLNA 

; » * ************************************ 

;* - RBUF RX LINE NUMBER FIELD TEST 

;* THIS TEST VERIFIES THAT THE DUT RBUF RX LINE NUMBER FIELD IS WORKING 

J* CORRECTLY BY UTILIZING THE SELFTEST COOES WHICH ARE PUT IN THE RX 

i* FIFO AFTER A BOARD RESET. 

; ************************************************** ********4>** ********* ****** 

BGNTST 

T8: : 

J ALLOW LTC INTERRUPTS. 

MOV 0PRI05.R0 
TRAP CISPRI 
.INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
;SET UP THE TEST NUMBER. (8) 
J INDICATE THAT WE ARE WITHIN A TEST. 
sSET ERROR TYPE AS FATAL IN ERROR TABLE. 
tSET ERROR MESSAGE ADDRESS IN ERROR TABLE. 



SETPRI OPRIOS 



TNUM 

MOV 

MOV 

MOV 

MOV 



■ TNUM ♦ 1 
#TNUM,TSTNUM 
0-l.CTRLCF 
♦l.ERRTYP 
«EM0601.ERRMSG 



012701 
^'.2702 
005003 
016704 
010214 
004767 
004767 
103016 



SET THE DUT CSR MASTER RESET (MR) BIT. PERFORM THE SKIP SELFTEST SEQUENCE. 
AND WAIT UP TO 5 SECONDS FOR THE MR BIT TO CLEAR. 



011610 
000040 

152760 

173054 
170670 



MOV 
MOV 
CLR 
MOV 
MOV 

JSR 

JSR 

BCC 



«5000. .Rl 
«BIT0S.R2 
R3 

CSRA.R4 

R2.(R4) 

PC.SKPSTS 

PC.MSLGET 

4t 



TIME-OUT VALUE IS 5.0 SECONDS. 

WAITING FOR MASTER RESET BIT. 

WAITING FOR BIT TO CLEAR. 

BIT IS IN THE OUT'S CSR. 

SET THE DUT MASTER RESET BIT. 

SKIP THE SELFTEST. 

WAIT FOR DUT CSR MR BIT TO CLEAR. 

GO REPORT ERROR IF MR DID NOT CLEAR. 



READ CHARACTERS FROM THE OUT RX FIFO AND VERIFY THAT THE LINE NUMBERS ARE 
CORRECT 

EIGHT CHARACTERS ARE READ FROM THE FIFO. 



005001 
012400 
011402 
010203 
000303 

042703 177760 
020301 
001017 
005201 

020127 000010 

001365 

000423 



012767 001441 

012767 016136 

012701 005651 

104460 



2$: 



CLR 

MOV 

MOV 

MOV 

SWAB 

BIC 

CMP 

BNE 
INC 
CMP 

BNE 
BR 



Rl 

(R4)».R0 
(R4).R2 
R2.R3 
R3 

0177760, R3 

R3.R1 

6< 

Rl 

Rl.*8. 
2$ 
60 » 



! CLEAR THE LINE COUNTER, 

{INCREMENT POINTER TO PNT TO THE DUT RBUF REG. 
I READ A CHARACTER FROM THE DUT RX FIFO. 



5 REMOVE ALL BUT LltiE NUMBER BITS. 

; COMPARE WITH EXPECTED LINE NUMBER. 

;G0 REPORT ERROR IF LINE NUMBERS DON T MATCH. 

.•INCREMENT THE EXPECTED LINE NUMBER. 

{COMPARE NUMBER OF CODES READ WITH MAX. 

{LOOP UNTIL CODES FOR ALL LINES ARE READ. 

sEXIT TEST WITHOUT ERROR. 



ERROR REPORTS: 



154430 
154426 



4$i 



{REPORT MR BIT WOULD NOT CLEAR AFTER A DUT RESET. 



MOV 
MOV 
MOV 
ERROR 



*0801. .ERRNBR 
«ER0503.ERRBLK 
«EM0202.R1 



SET THE ERROR NUMBER IN ERROR TABLE. 
SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
SELECT ERROR MESSAGE. 

REPORT ERROR. >>>>> ERROR *0801 <<<<< 

TRAP CiERROR 



CJOMUBO OMU II TUNC TST PARTI 
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5495 
b4<M 
5495 

5496 
5497 
5498 
5499 

5500 
5501 



5502 
5505 



027554 000411 



027556 
027564 

027572 
027576 
027576 

027400 
027400 
027404 
027406 
027412 
027412 
027412 



012767 
012767 
012701 

104460 



012700 
104441 

005067 



104401 



001442 
016156 
010656 



000540 
152674 
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BR 



601 



154404 

15440^ 



61: 



601: 



I REPORT THAT RX LINE NUMBER 
MOV •0602. .ERRNBR 
HOV tEROSOS.ERRBt-K 
MOV •EM0602.R1 
ERROR 



SETPRI tPRIO/ 



CLR 
ENOTST 



CTRLCf 



lEXlT THE TEST. 

FIELD IS WRONG TOR SELFTEST CODE. 
iSET TME ERROR NUMBER IN ERROR TABLE. 
iSET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
I SELECT ERROR MESSAGE. 

iREPORT ERROR. >>>>> ERROR OOSO^ 

TRAP C« ERROR 

{DISABLE ALL INTERRUPTS. 

MOV •PRI07,R0 
TRAP CISPRI 
I INDICATE THAT UE COMPLETED THE TEST. 



L10055: 



EC 144 



TRAP 



CIETST 
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5505 
5506 
550? 
5508 
5509 
5510 
5511 
55 

5513 
5514 
5515 
5516 
5517 

5518 



027414 
027414 
027414 
027414 

027420 



01.'>700 000240 
104441 



5519 




000011 






5520 


027422 


012767 


000011 


152674 


5521 


027430 


012767 


177777 


152650 


5522 


027436 


012767 


000001 


154322 


S52S 


027444 


012767 


001605 


154316 


5524 


027452 


012767 


010726 


154312 


5525 










5526 










5527 










5526 










5529 


027460 


012701 


005670 




5550 


027464 


012702 


000040 




5531 


027470 


005003 






5532 


027472 


016704 


152544 




5533 


027476 


004767 


17C462 




5534 


027502 


103027 






5535 










5536 










5537 










5538 


027504 


010214 






5539 


027506 


004767 


172632 




5540 










5541 










5542 










5543 










5544 


027512 


012704 


000764 




5545 


027516 


004767 


170402 




5546 


027522 


004767 


171014 




5547 


027526 


103015 






5548 










5549 










5550 










5551 


027530 


016702 


152770 




5552 


027534 


012703 


002526 




5553 


027540 


020203 






5554 


027542 


001414 






5555 










5556 










5557 










5558 











.SeTTL HAROyARE TEST 



BMPCMK 



t • ' 
: • 



BMP CHECK TEST 

THIS TEST IS USED TO VERIFY THAT THE OuT DOES NOT I1MEDIATEL' FAIL 
THE ON-BOARO BACKGROUND -HONI TOR PROGRAH. AND HENCE INVALIDATE 
SUCCEEDING TESTS. 

THIS TEST LOOKS FOR BMP COOES IN THE FIFO FOR A SET PFPIOO IMMEDIATELt 
AFTER THE SELF TEST IS SKIPPCD. 

ANY BMP COOES THAT ARE FOUND ARE SAVED ON THE QUEUE AND APE ALSO 
REPORTED IN THIS TEST. 



BGNTST 

SETPRI dPRIOS 



» ALLOW LTC INTERRUPTS. 



T9! 



TNUM 

MOV 

MOV 

MOV 

MOV 

MOV 



■ TNUM ♦ 1 
•TNUM.TSTNUM 
•-1.CTRLCF 
•l.ERRTYP 
•0901..ERRNBR 



I INCREMENT THE ASSEMBLY TIME 
tSET UP THE TEST NUMBER. 
I INDICATE THAT WE ARE WITHIN 
I SET ERROR TYPE AS FATAL IN ERROR TABLE. 
I SET THE ERROR NUMBER. 



MOV •PRIOS.RG 
TRAP CISPRI 
TEST COLtlTER. 

(9) 
A TEST. 



•EM0901.ERRMSG tSET THE ERROR MESSAGE 



WAIT UP TC 3 SECONDS FQR THE OUT MASTER RESET BIT TO CLEAR. 

IF Jim OUT OCCURS. THEN EXIT THIS TEST. 

MOV «3000..R1 tTIME-OUT VALUE IS 3.0 SECONDS. 

MOV •Biros. R2 lUAITING FOR MASTER RESET BIT. 

CLR R3 t WAX TING FOR BIT TO CLEAR. 

MOV CSRA.R4 iBIT IS IN THE OUT'S CSR. 

JSR PC.MSLGET lUAIT FOR OUT.CSR.MR BIT TO CLEAR. 

6CC SOI {ABORT THE TEST IF MR DID NUT CLEAR. 



I ♦ 



RESET THE OUT, SKIP THE SELF TEST. 

MOV R2.CR4) tSET THE OUT MASTER RESET BIT. 

JSR PC.SKPSTS I WRITE THE SKIP SELFTEST COOES TO THE OUT, 



: ♦ 

i 

t 

I - 



WAIT FOR MASTER RESET TO CLEAR. DELAY FOR 500 MILLI-SECS BEFORE PURGING 
THE FIFO. 

MOV •SO0..R4 I TIME -OUT VALUE IS 500 MILLi SECONDS. 

JSR PC. DELAY I WAIT FOR BMP TO BEGIN EXECUTION. 

JSR PC.PUFIFO iPURGE THE FIFO. SAVING ANY BMP COOES. 

BCC SOS I ABORT THE TEST IF THE FIFO DID NOT CLEAR. 



I • 

I 
; 



REPORT THE ERROR IF ANT BMP COOES WERE FOUND. 

MOV BMPCQP.R2 iGET THE CONTENTS OF THE POINTER TO THE BMP Q. 

MOV •BMPCaS.RS I GET THE START ADDRESS OF THE QUEUE. 

CMP R2.R3 iSEE IF THE POINTER HAS MOVED FROM THE BASt . 

BEG 60t tEXIT NO CODES IN THE QUEUE. 



I ♦ 

t 

I 



THERE IS AT LEAST ONE BMP CODE IN THf QUEUE. REPORT THE FRROR. 
iREPORT ERROR BMP CODE FOUND IN TtbT NN. BMP COOf :NNNNNN 



C70HUB0 DHL II ruNC TSr PARTI 
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BMPCHK 
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5559 


027544 


012701 


010766 




MOV 


5560 


027550 
027550 
027552 
027554 
027556 


104455 

001605 
010726 
017262 






ERROF 


5561 


027960 


000405 






BR 


5562 












5565 


027562 


012767 


001606 


154200 50* : 


NOV 


5564 


027570 


004767 


172676 




JSR 


5565 












5566 


027574 
027574 
027600 


012700 
104441 


0OOS4O 


60S: 


SETPRI 


3567 


027602 


005067 


152500 




CLP 


5560 


027606 
027606 
027606 


104401 






ENDTST 



•EM0902.RI I PASS THE MESSAGE TO BE REPORTED, 

090l,EM0901.ER<»30l : >>>>> ERROR *09Cl <<<<< 

TRAP 
.UQRD 
.UORO 
.UORO 



60« 

#902. .ERRNBR 
PC.TSABRT 

<«>RI07 



CTRLCF 



I SET >>>>> ERROR »0902 <<<<<, 
; REPORT NGN TEST RELATED ERROR. 

;OISABLE ALL INTERRUPTS. 

MOV 
TRAP 

J INDICATE THAT WE COMPLETED THE TEST, 



L 10056: 



C»ERlf 
901 

EM0901 
ER9301 



TRAP 



•PRI07.ro 
OSPRI 



CIETST 



<^E0 146 
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HARDWARE TEST 

5570 
5571 
5572 
5575 
5574 
5575 
5576 
5577 
5578 
5579 



BMPCHK 



<^£Q 147 



5580 


027610 
027610 






5581 


027610 








027610 


012700 


000240 




027614 


104441 




5582 




000012 




5583 


027616 


012767 


000012 


5584 


027624 


012767 


177777 


5585 


027632 


012767 


000001 


5586 


027640 


012767 


011022 


5587 


027646 


012767 


016136 


5588 








5589 








5590 








5591 








5592 


027654 


012701 


011610 


5593 


027660 


012702 


000040 


5594 


027664 


005003 




5595 


027666 


016704 


152350 


5596 


027672 


004767 


170266 


5597 


027676 


103037 




5598 








S599 








5600 








5601 








5602 








5603 


027700 


012701 


000062 


5604 


027704 


010214 




5605 


027706 


004767 


172432 


5606 


027712 


004767 


170246 


5607 


027716 


103011 




5608 


027720 


020127 


000050 


5609 


027724 


003015 




5610 








5611 








5612 








5613 








56 14 








5615 








5616 


027726 


012767 


001753 


5617 


027734 


004767 


171554 


5618 


027740 


000423 




5619 








S620 








5621 








5622 








5623 


027742 


012767 


001751 



152500 
152454 
154126 
154124 
154120 



154034 



.SbTTL HARDWARE TEST 



- S^SELF 



i ♦ ♦ 

I* 

I* 

I* 

»• 

1* 

I - - 



SKIP SELr-TEST TEST 
THIS TEST VERIFIES THAT THE OUT SKIPS THE SELF TEST WITHIN THE 
TIME ALLOWED. AND THAT THE FIFO CONTAINS THE CORRECT CODES AFTER ITS 
COMPLETION. 



BGNTST 
SETPRI 



TNUM 

MOV 

MOV 

MOV 

MOV 

MOV 



0PRI05 



• TNUM ♦ 1 
•TNUM.TSTNUM 
♦l.CTRLCF 
♦l.ERRTYP 
•EMIOOI.ERRMSG 
«ER05O3.ERRBLK 



TIO:; 

(ALLOW LTC INTERRUPTS. 

MOV tfPRI05.R0 
TRAP C«SPRI 

(INCREMENT THE ASSEMBLY TIME TEST COUNTER, 

I SET UP THE TEST NUMBER. CIO) 

(INDICATE THAT WE ARE WITHIN A TEST. 

(SET ERROR TYPE AS FATAL IN ERROR TABLE. 

(SET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

(SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 



WAIT UP TO 5 SECONDS FOR THE OUT MASTER RESET BIT TO CLEAR. 
IF TIME-OUT OCCURS. THEN EXIT THIS TEST. 

MOV «5000..R1 (TIME-OUT VALUE IS 5.0 SECONDS. 

MOV «6IT05.R2 (WAITING FOR MASTER RESET BIT. 

CLR R3 (WAITING FOR BIT TO CLEAR. 

MOV CSRA.R4 (BIT IS IN THE OUT'S CSR. 

JSR PC.MSLGET (WAIT FOR DUT.CSR.MR BIT TO CLEAR. 

BCC 501 s ABORT THE TEST IF MR DID NOT CLEAR. 

i DETERMINE IF THE OUT TAKES TOO SHORT OR TOO LONG A TIME TO SKIP THE SELF -TEST 
( SET-UP A TIME-OUT OF 50 MILLI-SFCOND. IF MR IS CLEAR IN LESS THAN 10 MILLI 
( -SECOND. OR GREATER THAN 50 Mlud SECONDS. REPORT THE ERROR. 



MOV 
MOV 

JS9 
JSR 
BCC 

CMP 
BGT 



•50.. Rl 

R2.(R4) 

PC.SKPSTS 

PC.MSLGET 

2> 

Rl.«40. 
41 



(TIME-OUT VALUE IS 50 MILL I -SECONDS. 

(SET THE OUT MASTER RESET BIT. 

(WRITE THE SKIP SELFTEST COOES TO THE OUT. 

(WAIT FOR DUT.CSR.MR BIT TO CLEAR. 

(GO REPORT ERR IF SKIPPING STEST TOOK TOO LONG. 

(GO REP ERR IF SELFTEST COMPLETED IN < 10 MS. 



SELF-TEST COMPLETED WITHIN 10 MILLI-SEC TO 50 MILLI -SECONDS. 

VERIFY THAT THE SELF TEST COOES IN THE FIFO ARE "GOOO" CODES .IE THE OUT 

SUCCESSFULLY COMPLETED THE SELF -TEST. 
THIS SUBROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 1003 THRU 1007 <<<«<. 



i - 



( ♦ 



( 

J - 

154020 2$! 



MOV 
JSR 
BR 

ERROR REPORTS: 



01003.. ERRNBR 
PC.RSTRPT 
60* 



(REPORT SKIP SELF -TEST TOOK 
MOV «1001. .ERRNBR 



(SET ERROR NUMBER TO 1003. 

(CHECK SELF -TEST COOES IN THE FIFO. 

(EXIT TEST. 



TOO LONG. 

iSFT THE ERROR NUMBER IN THE ERROR TABLE 



CZDHUBO OMU 11 ruNC TST PART 
HARDUARE TP.Sf 



5624 027750 

5625 027754 
027754 

5626 027756 
5627 

5628 

5629 027760 

5650 027766 

5651 027772 
027772 

5652 027774 
5655 

5654 027776 

5655 050004 
5656 

5657 050010 
050010 
050014 

5658 050016 

5659 050022 
050022 
050022 



012701 

104460 
000414 



012767 
012701 

104460 
000405 

012767 
004767 



012700 
104141 
005067 



104401 



011055 



HACRO ni200 



001752 
011142 



001755 
172462 



000540 
152264 
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♦EM1002.R1 



Fi2 

PAGE 109 1 



MOV 
ERROR 

BR 



60 < 



I SELECT ERROR M€SSAGE. 
(REPORT ERROR. 

;EXIT THE TEST. 



>>>>> ERROR «1001 *<<<« 
TRAP CtERROR 



154002 At. 

155764 50« : 
60«; 



{REPORT SKIP SELF TEST COMPLETED TOO SOON. 



MOV 
MOV 
ERROR 

BR 

MOV 

JSR 

SETPRI 



CLR 
ENOTST 



«1002. .ERRN8R 
OEM1005.R1 



60t 

«1003. .ERRMBR 
PC.TSABRT 

«PRI07 
CTRLCr 



iSET THE ERROR NUMBER IN THE ERROR TABLE. 
; SELECT ERROR MESSAGE. 

(REPORT ERROR. >>>>> ERROR vl002 <<<<< 



TRAP 
jEXIT THE TEST. 

sSET ERROR NUMBER. 

{REPORT NGN TEST RCLATEO ERROR. 

s DISABLE ALi INTERRUPTS. 

MOV 
TRAP 

(INDICATE THAT UE COMPLETED THE TEST. 



CtERROR 



L 10057: 



TRAP 



*PRI07.R0 
C»SPRI 



C»ETST 



czoHueo ohu-11 kinc 
harouar^ tesi 



Gi2 
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•■>E0 149 



5641 
5642 
5643 
5644 
5645 
5646 
5647 

5648 
5649 
5650 

5651 



5652 
5653 
5654 
5655 
5656 
5657 
5656 
5659 
5660 
5661 
5662 
5663 
5664 
5665 
5666 
5667 
5666 
5669 
5670 
5671 
5672 
5673 
5674 
5675 
5676 
5677 
5678 
5679 
5680 
5681 
5682 
5683 
5684 
5685 
5686 
5687 
5688 
5689 
5690 
5691 
5692 
5693 
5694 



.SBTTL HARDWARE TEST 



OFSKST - 



030024 
030024 
030024 
030024 
030030 

030032 
030040 
030046 
030054 
030062 



030070 
030074 
030100 
030102 
030106 
030112 



030114 
030116 



030122 
030126 
030132 
030134 
030140 
030144 



030146 
030152 
030154 
030160 
050162 



i • ♦ 
J* 



- OIAGWSTIC FAIL BIT. SKIP SELF TEST TEST 
THIS TEST VERIFIES THAT THE DIAGNOSTIC FAIL BIT OF THE DUT, CQRRECTLf 
CHANGES STATE AS THE ON-BOARED SELFTEST IS SKIPPED. 



012700 
104441 
000013 
012767 
012767 
012767 
012767 
012767 



000240 



000013 152264 

177777 152240 

000001 153712 

011220 153710 

016136 153704 



8GNTST 
SETPRI 



TNUM 

MOV 

MOV 

MOV 

MOV 

MOV 



•PR 105 



■ TNUM ♦ 1 
•TNUM.TSTNUM 
•l.CTRLC' 
«l.ERRTYP 
•EMllOl.ERRMSG 
«ER0SO3.ERRBLK 



Til: : 

I ALLOW LTC INTERRUPTS. 

MOV dPRIOS.RO 
TRAP CISPRI 

t INCREMENT TtC ASSEMBLY TIME TEST COUNTER. 

;SET UP THE TEST NUMBER. (117 

tINOICATE THAT WE ARE WITHIN A TEST. 

tSET ERROR TYPE AS FATAL IN ERROR TABLE. 

tSET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

I SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 



012701 011610 

012702 000040 
005003 

016704 152134 

004767 170052 
103044 



010214 

004767 172222 



012701 000005 

012702 020000 
010203 

016704 152102 

004767 170020 
103020 



WAIT UP TO 5 SECONDS FQP THE DUT MASTER RESET BIT TO CLEAR. 

IF TIME-OUT OCCURS, THEN EXIT THIS TEST, 

MOV 05000.. Rl s TIME-OUT VALUE IS 5.0 SECONDS. 

MOV «BIT05.R2 ; WAITING FOR MASTER RESET BIT. 

CLR R3 jWAITING FOR BIT TO CLEAR. 

MOV CSRA.R4 iBIT IS IN THE OUT'S CSR. 

JSR PC.MSLGET sWAIT FOR DUT .CSR .MR BIT TO CLEAR. 

BCC 50» {ABORT THE TEST IF MR DID NOT CLEAR. 



I ♦ 



RESET THE OUT. SKIP THE SELF- TEST, 



MOV 

JSR 



R2.(R4) 
PC.SKPSTS 



iSET THE DUT MASTER RESET BIT. 

jWRITE THE SKIP SELFTEST C00E3 TO THE OUT 



012701 000017 
005003 

004767 170004 

103012 

010105 



i*SET TIME OUT OF 5 MILLI SECONDS. WAIT FOR DIAG.FAIL BIT TO SET. 
I IF TIME-OUT OCCURS GO REP0R1 THE ERROR. 

MOV OS.Rl »TIME-OUT VALUE IS 5 MILLI -SECONDS. 

MOV «6ITIS.R2 (WAITING FOR DIAGNOSTIC FAIL BIT. 

MOV R2.RS {WAITING FOR BIT TO SET. 

MOV CSRA.R4 jBIT IS IN THE DUT'S CSR. 

JSR PC.MSLGET jWAIT FOR DUT.CSR OF BIT TO CLEAR. 

BCC 4» ilF DIAG.FAIL DID NOT SET. GO REPORT ERROR. 

TsET TIME-OUT OF 15 MILLI-SECS. WAIT FOR DIAG.FAIL TO CLEAR, 
{ IF TIME-OUl OCCURS GO REPORT THE ERROR. 

; VERIFY THE DIAG FAIL BIT IS IN A STABLE STATE BEFORE CONTINUING. LOOP 

s BACK IF THE STATE WAS TRANSITORY. USING THE REMAINDER OF THE 15 MS TIME OUT. 

' MOV n5..Rl , TIME-OUT VALUE 13 15 MILLI SECONDS. 

2»: CLR R3 .-WAITING FOR BIT TO CLEAR. 

JSR PC.MSLGET iWAIT FOR DUT.CSR.DF BIT '0 CLEAR. 

BCC 4» J IF DIAG FAIL DID NOT CLEAR, GO REPORT ERRJR. 

MOV Rl,R5 {SAVE THE REMAINING TIME OUT VALLC. 



Hi? 



CZQMUBO OMU 11 TUNC 
HARDWARE TEST 
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- OfSKST 



5695 
5696 
5697 
5698 
5699 
5700 
S'Ol 
5^02 
5703 
5704 
5705 
5706 
5737 

5708 
5709 
5'10 
5711 
5712 
5713 



5714 

5715 



030164 
030170 
030174 
030200 
030202 
0S0204 



030206 
030214 
030220 
030220 
030222 

030224 
030232 

030236 
030236 
030242 
030244 

030250 
030250 
030250 



012701 
052703 
004767 
103016 
010501 
000762 



012767 
012701 

104460 
000405 

012767 
004767 



012700 
104441 
005067 



104401 



<«0 ISO 



000001 
020000 
167764 



MOV 

BIS 
JSR 
BCC 

MOV 
BR 

ERROR REPORTS: 



*1.R1 :SET TIME OUT OF l Mil LI -SECONO. 

♦BIT13.R3 jUAIT FOR BIT TO SET 

PC.MSLGET jDOUBLE CHECK TO ELIMINATE NOISE PROBLEMS. 

60$ ;EXIT IF DIAG.FAIL BIT STILL CLEAR. 

R5.R1 jPASS THE REMAINING TIME-OUT VALUE, 

21 iLOOP TO CHECK AGAIN. 



0021 IS 
011517 



002116 
172234 



000340 
152036 



153554 4»: 



{REPORT DIAGNOSTIC FAIL BIT BAD. 



153536 50( : 



60«: 



MOV 
MOV 
ERROR 

BR 

MOV 
JSR 

SETPRI 



CLR 
ENDTST 



«1101. .ERRNBR 
#eMl205.Rl 



60$ 

•1102.. ERRNBR 
PC.TSABRT 

#PRI07 
CTRLCF 



I SET THE CRROR NUMBER IN THf ERROR TAQLE. 
; SELECT ERROR MESSAGE. 
{REPORT ERROR. >>>>> ERROR «1101 <<<<< 



{EXIT THE TEST, 



TRAP 



CIERROR 



I SET THE ERROR NUMBER FOR TSABRT RTN. 
{REPORT NON TEST RELATED ERROR. 

{DISABLE ALL INTERRUPTS. 

MOV 
TRAP 

{INDICATE THAT UE COMPLETED A TEST. 



L 10040: 



TRAP 



0PRI07.ro 
CtSPRI 



C$ETST 



CZOHUBO Oho 11 fuNC 
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5.'17 
5^18 

5720 

5722 
5725 
5724 
5725 
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<iEO 151 



5726 



5727 
572$ 
5^29 
5730 
5731 
5732 
5733 
5734 
5735 
5736 
5737 
5738 
5739 
5740 
5741 
5742 
5743 
5744 
5745 
5746 
5747 
5748 
5749 
5750 
5751 
5752 
5753 
5754 
5755 
5756 
5757 
5758 
5759 
5760 
5761 
5762 
5763 
5764 
5765 
5766 
5767 

5768 
5769 



050252 
030252 
030252 
030252 
030256 

030260 
030266 
030274 
030502 
030310 



030316 
030322 
030326 
030330 
030334 
030340 



030342 
030346 
030350 
030354 
030356 
030362 
030364 
030370 
030372 
030376 



030400 
030404 

030406 
030114 
030420 
030420 



012700 
104441 
000014 
012767 
012767 
012767 
012767 
012767 



012701 
012702 
005003 
016704 
004767 
103067 



012701 
010214 
004767 
103034 
012702 
160102 
020227 
002435 
020227 
002441 



032714 
001412 

012767 
012701 

104460 



.SBTTL HARDWARE TEST 



- SELFTS 



I* - SELF -TEST TEST - 

f* THIS TEST VERIFIES THAT THE DUT'S SELF -TEST EXECUTES WITHIN THE 

♦ TIME ALLOWED. AND THAT THE FIFO CONTAINS THE CORRECT CODES AFTER ITS 

• COMPLETION. 



000240 



000014 
177777 
000001 
011273 
016136 



011610 
000040 

151706 
167624 



152036 
152012 
153464 
153462 
153456 



BGNTSr 
SETPRI 



TNUM 

MOV 

MOV 

MOV 

MOV 

MOV 



•PRI05 



■ TNUM ♦ 1 
♦TNUM.TSTNUM 
0 l.CTRLCF 
♦l.ERRTYP 
«EM120l.ERRMSG 
«ER0503.ERRBLK 



T12: : 

; ALLOW LTC INTERRUPTS. 

MOV «PRI05,R0 
TRAP C$SPRI 
; INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
sSET UP THE TEST NUMBER, 
t INDICATE THAT WE ARE WITHIN 
J SET ERROR TYPE AS FATAL IN ERROR TABLE 
tSET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
iSET ERROR ROUTINE ADDRESS IN ERROR TABLE. 



(12) 
TEST, 



WAIT UP TO 5 SECONDS FOR THE OUT MASTER RESET BIT TO CLEAR. 
IF TIME-OUT OCCURS. THEN EXIT THIS TEST. 



MOV 
MOV 
CLR 
MOV 
JSR 
6CC 



«5000. .Rl 
*BIT05.R2 
R3 

CSRA.R4 

PC.MSLGET 

50$ 



; TIME -OUT VALUE IS 5.0 SECONDS, 
WAITING FOR MASTER RESET BIT. 
WAITING FOR BIT TO CLEAR. 
BIT IS IN THE DUT'S CSR. 

tWAIT FOR DUT CSR MR BIT TO CLEAR. 

(ABORT THE TEST IF MR DID NOT CLEAR. 



DETERMINE IF THE SELF -TEST TAKES TOO SHORT OR TOO LONG A TIME TO COMPLETE. 
SET-UP A TIME-OUT OF 5 SECOND. /F MR IS CLEAR IN LESS THAN 1/2 SECOND. OR 
GREATER THAN 5 SECONDS. REPORT THE ERROR. 



011610 
167610 
011610 
000062 
000764 



020000 



002264 
011517 



MOV 
MOV 

JSR 

BCC 
MOV 
SUB 
CMP 

BLT 
CMP 

BLT 



♦5000. .Rl 
R2.(R4) 
PC.MSLGET 
4» 

«5000. .R2 
R1.R2 
R2.«50. 
61 

R2.#500. 
81 



I TIME OUT VALUE IS 5.0 SECONDS. 
I SET THE DUT MASTER RESET BIT. 
;WAIT FOR DUT_CSR.MR BIT TO CLEAR. 
GO REPORT ERROR SELFTEST TOOK TOO LONG. 

CALCULATE 0 OF MS SELFTEST TO COMPLETE. 

SELFTEST SKIPPED? YES, GO REPORT ERROR. 

iGO REP ERR IF SELFTEST COMPLETED IN < 1/2 SEC. 



153354 



SELF-TEST COMPLETED WITHIN ISEC TO 5 SECONDS. 
CHECK THE STATE OF THE DIAGNOSTIC FAIL BIT. REPORT ERROR IF IT IS SET. 

BIT «BIT13.(R4) jDETERMlNE IF THE DIAG.FAIL BIT IS CLEAR. 

BEG 21 jSKIP ERROR REPORT IF BIT IS CLEAR. 

(REPORT DIAGNOSTIC FAIL BIT BAD. 

MOV »1204..ERRN8R tSET ERROR NUMBER TO IN ERROR TABLE. 
MOV •EM1205,R1 (SELECT THE ERROR MESSAGE. 

ERROR s >>>>> ERROR 01204 <<<<» 

TRAP Ct ERROR 

i*EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



I fUNC TST P, 



MACRO mzoo 



5770 
5771 
5775 
5773 
5774 
5775 
5776 
5777 
57 78 
5779 
5780 
5781 
5782 
5783 
5784 
5785 
5786 
5787 
5788 

5789 
5790 
5791 
5792 
5793 
5794 

5795 
5796 
5797 
5798 
5799 
5800 

5801 
5802 
5803 
5804 
5805 
5806 



5807 
5808 



030422 
030430 



030432 
030440 
030444 



030446 
030454 
030460 
030460 
030462 



030464 
030472 
030476 
030476 
030500 



030502 
030510 
030514 
030514 
030516 

030520 
030526 

030532 
030532 
030536 
030540 
030544 
030544 
030544 



rrs 



032767 000100 151574 
001440 
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012767 002265 153330 
004 767 171050 
000432 



012767 002261 153314 
012701 011321 



104460 
000423 



012767 002262 153276 
012701 011463 



104460 
000414 



012767 002263 153260 

012701 011405 

104460 
000405 

012767 002272 153242 

004767 171740 



012700 000340 
104441 

005067 151542 



104401 



BIT 
BEQ 



«eiT06,0PTI0N 
60$ 



:EXIT WITH TEST FAILURE MESSAGE IF 

;N0 EXTENDED ERROR REPORTING HAS BEEN REQUESTED 

;DURING THE SOFTWARE QUESTIONS. 



J VERIFY THAT THE SELF TEST COOES IN THE FIFO ARE "GOOD" COOES .IE THE OUT 
; SUCCESSFULLY COMPLETED THE SELF TEST. 

i THIS SUBROUTINE REPORTS ERRORS WITH NUMBERS >>>>> 1205 THRU 1209 <<<<<. 



2* : MOV 
JSR 
BR 

ERROR REPORTS: 



«120S. .ERRNBR 
PC.RSTRPT 
60 » 



;SET ERROR NUMBER TO 1205. 

; CHECK SELF -TEST COOES IN THE FIFO. 

sEXIT TEST. 



jPEPORT SELF TEST TOOK TOO LONG TO COMPLETE, 
4$: MOV «1?01. .ERRr«R :SET THE ERROR NUMBER IN THE ERROR TABLE. 

MOV 0EM1202.R1 (SELECT ERROR MESSAGE. 

ERROR (REPORT ERROR. >>>>> ERROR «1201 <<<<< 

TRAP C$ ERROR 

BR 60$ (EXIT THE TEST. 

(REPORT SELF -TEST DID NOT EXECUTE AFTER OUT RESET. 
6$: MOV « 1202. .ERRNBR (SET THE ERROR NUMBER IN ERROR TABLE. 

MOV «£M1204.R1 (SELECT ERROR MESSAGE. 

ERROR (REPORT ERROR. >>>>> ERROR «1202 <*<<< 

TRAP C$ ERROR 

BR 60$ (EXIT THE TEST, 



8$: 

50$: 
60$: 



(REPORT SELF -TEST COMPETED TOO SOON. 



MOV 
MOV 
ERROR 

BR 

MOV 
JSR 

SETPRI 



CLR 
ENDTST 



«1203. .ERRNBR 
OEM1203.R1 



60$ 

«1210. .ERRNBR 
PC. TSABRT 

#PRI07 
CTRLCr 



(SET THE ERROR NUMBER IN THE ERROR TABLE. 
(SELECT ERROR MESSAGE. 
(REPORT ERROR. >>>>> ERROR 01203 <<<<< 



(EXIT THE TEST. 



TRAP 



C$ERROR 



(SET THE ERROR NUMBER FOR TSABRT RTN. 
(REPORT NON-TEST RELATED ERROR. 

(DISABLE ALL INTERRUPTS. 

MOV 
TRAP 

(INDICATE THAT WE COMPLETED THE TEST. 



L10041: 



TRAP 



♦PRI07.R0 
C$SPRI 



C$ETST 



K12 
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«.60 ISS 



5810 
5811 
58 

5813 
5814 
5815 
5816 
5817 
5818 
5819 
5820 

5821 



5822 
5823 
5824 
5825 
5826 
5827 
5826 
5629 
5630 
5631 
5832 
5633 
5634 
5835 
5636 
5837 
5838 
5839 
5840 
5841 
5842 
5843 
5644 
5845 
5846 
5647 
5646 
5649 
5650 
5651 
5652 
5853 
5854 
5855 
5856 
5857 
5656 
5859 
5860 
5861 
5862 
5863 



030546 
030546 
030546 
030546 
030552 

030554 
030562 
030570 
030576 
030604 
030612 



030620 
030624 
030630 
030632 
030636 
030642 



030644 
030652 
030656 
030662 



030670 
030674 
030700 
030704 
030706 
030712 
030716 



SBTTL HARDWARE TEST - STFAIL - 

t * *************************** 

SELF TEST FAIL TEST 
THIS TEST VERIFIES THAT THE OUT WILL REPORT SELFTEST ERRORS VIA THE 
FIFO. AND THAT THE DIAGNOSTIC FAIL BIT WILL INDICATE THE ERROR. 
THIS IS ACCOMPLISHED VIA A SOFTWARE 'HOOK' IN THE SELF -TEST. WHICH 
FORCES A "PROCl TO RAM ERROR" TO BE PLACED IN THE FIFO. 



i 



012700 
104441 
000015 
012767 
012767 
012767 
012767 
012767 
012767 



000240 



000015 
177777 
000001 
011543 
016136 
002425 



SETPRI »PRI05 



012701 011610 

012702 000040 
005003 

016704 151404 

004767 167322 
103064 



012777 000040 

012704 000031 

004767 167242 

012777 146314 



005267 
012701 
012702 
005003 
016704 
004767 
103036 



153074 
011610 
000040 

151330 
167246 



151542 
151516 
153170 
153166 
153162 
153150 



*************************************************************************** 

BGNTST 

T13: : 

; ALLOW Lie INTERRUPTS, 

MOV «PRI05.R0 
TRAP CISPRI 
s INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
sSET UP THE TEST NUMBER. C13) 
(INDICATE THAT UE ARE WITHIN A TEST. 
I SET ERROR TYPE AS FATAL IN ERROR TABLE. 
tSET ERROR MESSAGE ADDRESS IN ERROR TABLE. 
;SET ERROR ROUTINE ADDRESS IN ERROR TABLE. 
;SET ERROR NUMBER TO 1301. 



TNUM 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 



■ TNin ♦ 1 
i^TNUM.TSTNUM 
♦-1.CTRLCF 
♦l.ERRTYP 
#EM1301.ERRMSG 
«ER0503.ERRBLK 
»1301..ERRNBR 



> ♦ 



151370 
151370 



030720 005267 153044 



WAIT UP TO 5 SECONDS FOR THE DUT MASTER RESET BIT TO CLEAR. 
IF TIME-OUT OCCURS. THEN EXIT THIS TEST. 

MOV «5000..R1 :TIHE-OUT VALUE IS 5.0 SECONDS. 

MOV «6IT05.R2 -.WAITING FOR MASTER RESET BIT. 

CLR R3 (WAITING FOR BIT TO CLEAR. 

MOV CSRA.R4 (BIT IS IN THE OuT'S CSR. 

JSR PC.MSLGET iWAIT FOR DUT_CSR_MR BIT TO CLEAR. 

BCC 501 (GO REPORT ERROR IF MR DID NOT CLEAR. 

'reset the DUT, DELAY FOR 25 MILLI-SECONOS BEFORE WRITING THE FAIL.SELF TEST 
CODE TO TBUFFCT REGISTER ON CHANNEL 0. 

MOV *6IT05.8CSRA (SET DUT MASTER RESET BIT, SELECT CHANNEL 0. 

MOV 025..R4 (PASS DELAY PERIOD OF 25 MILLI SECS. 

JSR PC. DELAY jWAIT FOR SELFTEST TO INITIALISE. 

MOV ♦146314. 8TXBFCA (WRITE THE FAIL SELF-TEST CODE TO TBUFFCT REG. 

WAIT UP TO 5 SECONDS FOR THE SELF -TEST TO COMPLETE. 
IF TIME-OUT OCCURS. THEN EXIT THIS TEST. 

INC ERRNBR :SET ERROR NUMBER TO 1302. 

MOV «5000..R1 (TIME-OUT VALUE IS 5.0 SECONDS. 

MOV #6IT05.R2 (PASS THE BIT MAP OF THE BIT TO TEST. 

CLR R3 (SET UP THE EXPECTED STATE. 

MOV CSRA.R4 (BIT IS IN THE DUT'S CSR. 

JSR PC.MSLGET (WAIT FOR OUT.CSR.MR BIT TO CLEAR. 

BCC 50$ (GO REPORT ERROR IF MR DID NOT CLEAR. 

* VERIFY THE DIAGNOSTIC FAIL BIT IS SET, INDICATING THE ERROR. 
REPORT ERROR IF DIAGNOSTIC FAIL BIT IS CLEAR. 



INC 



ERRNBR 



(SET ERROR NUMBER TO 1303. 



L12 
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<;EQ 154 



5864 
5865 
5866 
5867 
5868 
5869 
5870 
5871 
5872 
5873 
5874 
5875 
5876 
5877 
5878 
5879 
5880 
5881 
5882 
::883 
5884 
5685 
S866 
5687 

5688 
5669 
5690 
5691 
5692 



5893 
5694 



050724 
030730 



03C732 
030736 
030742 
030744 
030750 
030752 
030754 
030760 
030764 
050766 
030770 
030772 
030774 
030776 
031000 

031004 
031010 
031010 
031012 

031014 

031020 
031020 
031024 
031026 
031032 
031032 
031032 



032714 020000 
001425 



BIT 061^13. (R4) jCHECK THE STATE OF THE OIAG.FAIL BIT. 

BEQ 10* iGO REPORT ERROR IF DIAG.FAIL BIT CLEAR. 

REMOVE THE 8 SELF TEST CODES FORM THE FIFO. AND VERIFY THAT AT LEAST 
ONE IS A PROCl TO RAM ERROR CODE (231). 

iSET ERROR NUMBER TO 1304. 
sSET MAXIMUM READ COUNT. 
; CLEAR THE CORRECT CODE COUNTER. 
•.GET ADDRESS OF THE RECEIVER BUFFER REGISTER. 
J READ A CODE FROM THE FIFO. 
;G0 REPORT ERROR IF THE FIFO IS EMPTY. 
J REMOVE THE LlHE NUMBER FROM THE CODE, 
sis IT THE CORRECT ERROR CODE?. 
;SKIP ^CXT INSTRUCTION. IF NOT A 231 CODE. 
I INCREMENT COUNTER. 
{DECREMENT MAX READ COUNTER. 
:LOOP IF 8 CODES HAVE NOT BEEN READ. 
sUERE ANY 231 CODES FOUND?. 
;YES, THEN EXIT. 

:N0. SET ERROR NUMBER TO 1505 AND REPORT ERROR. 
REPORTING BAD. 

i SELECT ERROR MESSAGE. 

:REPORT ERROR. >>>>> ERROR <<<<< 

TRAP OERROR 

jEXIT THE TEST. 

;REPORT NON-RELATED TEST ERROR, 
s DISABLE ALL INTERRUPTS. 

MOV 
TRAP 

: INDICATE THAT UE COMPLETED THE TEST. 









INC 


ERRN8R 




wwxw 




MOV 


08 . . RO 








CLR 


Rl 


VXD f\J^ 


X7XC ft 




MOV 


RBUFA.R4 


m 1 Any 






MOV 


(R4),R2 








BPL 


50$ 




007400 




BIC 


07400. R2 


120227 


170251 




CMPB 


R2. 0170251 


001001 






BNE 


8$ 


005201 






INC 


Rl 


005500 






DEC 


RO 


001566 






BNE 


6$ 


005701 






TST 


Rl 


001010 






BNE 


60$ 


005267 


152764 




INC 


ERRN8R 








sREPORT SELF TEST ERROR 


012701 


011576 


lOt: 


MOV 


0EM1502,R1 








ERROR 




104460 






BR 


60$ 


000402 






004767 


171452 


50$: 


JSR 


PC.TSABR. 






60$: 


SETPRI 


0PU07 


012700 


000340 








104441 








CTRLCF 


005067 


151254 




CLR 



0PRI07.ro 
C$SPRI 



ENOTST 



L 10042: 



104401 



TRAP 



OETST 



Mi2 
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5896 
5897 
5898 
5899 
5900 
5901 
5902 
5903 
5904 
5905 
5906 
5907 

5908 



5909 
5910 
5911 
5912 
5913 
5914 
5915 
5916 
5917 
5918 
5919 
5920 
5921 
5922 
5923 
5924 
5925 
5926 
5927 
5928 
5929 
5930 
5931 
5932 
5933 
5934 
5935 
5936 
5937 
5938 
5939 
5940 
5941 
5942 
5943 
5944 
5945 
5946 
5947 
5948 
5949 



031034 
031034 
031034 
031034 
031040 

031042 
031050 
031056 
031064 
031072 



031100 
031104 
031110 
031112 
031116 
031122 



031124 
031126 
031132 
031136 
031142 



031144 
031150 
031154 
031156 
031164 

031170 
031174 



012700 
104441 
000016 
012767 
012767 
012767 
012767 
012767 



012701 
012702 
005003 
016704 
004767 
103131 



010214 
004767 
012701 
004767 
103121 



012705 
012703 
010304 
012767 
012701 

017702 
100077 



.SBTTL HAROUARE TEST 



ROMVER 



i 



- ROM VERSION TEST - 
THIS TEST VERIFIES THAT THE DUT'S SELF-TEST PLACES VALID ROM VERSION 
NUMBERS IN THE FIFO AFTER IT HAS BEEN SKIPPED. THE ROM VERSION NUMBERS 
UILL BE REPORTED (ON THE FIRST PASS ONLY). IF AN AFFIRMATIVE ANSWER 
WAS GIVEN TO THE SOFTWARE P TABLE QUESTION. 



000240 



000016 
177777 
000001 
011635 
016136 



005670 
000040 

151124 
167042 



171212 
011610 
167022 



151254 
151230 
152702 
152700 
152674 



BGNTST 
SETPRI 



TNUM 

MOV 

MOV 

MOV 

MOV 

MOV 



«PRI05 



■ TNUM » 1 
OT^WM.TSTNUM 
*-l.CTRLCF 
♦l.ERRTYP 
«EM1401.ERRMSG 
«ER0503,ERRBLK 



T14: : 

J ALLOW LTC INTERRUPTS. 

MOV «PRI05 RO 
TRAP CtSPRI 

J INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

I SET UP THE TEST NUMBER. C14) 

: INDICATE THAT WE ARE WITHIN A TEST. 

:SET ERROR TYPE AS FATAL IN ERROR TABLE. 

iSET ERROR MESSAGE ADDRESS IN ERROR TABLE. 

tSET ERROR ROUTINE ADDRESS IN ERROR TABLE. 



WAIT UP TO 3 SECONDS FOR THE OUT MASTER RESET BIT TO CLEAR. 
IF TIME-OUT OCCURS. THEN EXIT THIS TEST. 

MOV «3000..R1 >TIME-OUT VALUE IS 3.0 SECONDS. 

MOV •BIT0S.R2 s WAITING FOR MASTER RESET BIT. 

CLR R3 (WAITING FOR BIT TO CLEAR. 

MOV CSRA.R4 >BIT IS IN THE DUT'S CSR. 

JSR PC.MSLGET ;WAIT FOR DUT_CSR_MR BIT TO CLEAR. 

BCC 501 : ABORT T(€ TEST IF MR DID NOT CLEAR. 

SET THE MASTER RESET BIT. AND SKIP THE SELF TEST. 



MOV 
JSR 

MOV 
JSR 

BCC 



R2.(R4) 
PC.SKPSTS 
•5000. .Rl 
PC.MSLGET 
50$ 



(SET THE MASTER RESET BIT. 

;SKIP THE SELF TEST. 

J TIME-OUT VALUE IS 5.0 SECONDS. 

sWAIT FOR DUT CSR MR BIT TO CLEAR. 

s ABORT THE TEST IF MR DID NOT CLEAR. 



000040 
000143 

002571 
011674 

151050 



REMOVE CHARACTE«S FROM THE FIFO UNTIL EITHER; 

(A) THE FIFO IS PURGED, GO REPORT THE ERROR. 

(B) THE MAXIMUM TRY COUNTER IS ZERO, GO REPORT THE ERROR. 

(C) PROC I'S ROM VERSION NUMBER WAS FOUND BEFORE PR0C_2'S. GO REPORT ERROR. 

(D) BOTh'ROH VERSION NUMBERS HAVE BEEN FOUND. 



152604 



2»: 



MOV #32.. R5 

MOV #99.. R3 

MOV R3.R4 

MOV «1401. .ERRNBR 

MOV •EM1402,R1 

MOV aRBUFA,R2 

BPL 1?» 



sSET MAXIMUM TRY COUNTER. 

sSET AN INVALID ROM VERSION NUMBER FOR PROC.l. 
(SET AN INVALID ROM VERSION NUMBER FOR PROC .2. 
iSET THE ERROR NUMBER TO 1401. 
(SELECT MESSAGE TO BE REPORTED IF FIFO EMPTY. 

sREAD THE NEXT CHAR FROM THE FIFO. 
jGO REPORT ERROR IF FIFO EMPTY. 



CHECK IF THE READ DATA IS A BMP CODE. 



FUNC 



H12 
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^EQ 156 



5950 








5951 


031176 


012700 


000301 


5952 


031202 


040200 




5953 


031204 


001003 




5954 


031206 


004767 


1^1064 


5955 


031212 


000435 




5956 








5957 








5958 








5959 


031214 


012700 


000201 


5960 


031220 


040200 




5961 


031222 


001431 




5962 








5963 








5964 








5965 








5966 


031224 


032702 


000002 


5967 


031230 


001407 




5968 


031232 


010204 




5969 


031234 


042704 


177603 


5970 


031240 


000241 




5971 


031242 


006004 




5972 


031244 


006004 




5973 


031246 


000417 




5974 


031250 


010203 




5975 


031252 


042703 


177603 


5976 


031256 


000241 




5977 


031260 


006003 




5978 


031262 


006003 




5979 


031264 


020427 


000143 


5960 


031270 


001016 




5981 








5982 








5983 








5984 








5985 


031272 


012701 


011762 


5986 


031276 


012767 


002572 


5987 


031304 


000433 




5988 








5989 


031306 


005305 




5990 


031310 


001327 




5991 


031312 


012701 


012035 


5992 


031316 


012767 


002573 


5993 


031324 


000423 




5994 








5995 








5996 








5997 








5998 


031326 


032767 


000001 


5999 


031334 


001431 




6000 


031336 


026727 


150750 


6001 


031344 


003025 




6002 


031346 
031346 
031350 


010446 
010346 






031352 


012746 


004154 




031356 


012746 


000003 



SET-UP A BIT MASK OF A BMP CODE. 
TRY TO CLEAR THE BIT MASK UITH THE READ DATA. 
BRANCH IF NOT A BMP CODE. 
iSAVE THE BMP CODE ON THE QUEUE. 



4$: MOV #201. RO jSET UP A BIT MASK OF A SELFTEST CODE. 

TRY TO CLEAR THE BIT MASK WITH THE READ DATA, 
BRANCH IF IT IS A SELFTEST CODE, 



MOV 


«301 RO 


BIC 


R2.R0 


BNE 


4$ 


JSR 


PC , SAVBMP 


BR 


8$ 


CHECK IF 


THE READ DATA 


MOV 


«201.R0 


BIC 


R2.R0 


BEQ 


8$ 


THE READ 


DATA IS A ROM 


BIT 


♦BIT1.R2 


BEQ 


6* 


MOV 


R2,R4 


BIC 


#177603. R4 


CLC 




ROR 


R4 


ROR 


R4 


BR 


8* 


MOV 


R2.R3 


BIC 


#1 77603, R3 


CLC 


ROR 


R3 


ROR 


R3 


CMP 


R4.«99. 


BNE 


10* 



J CHECK THE PROCESSOR NUMBER BIT IN THE CODE. 
BRANCH IF IT IS PROC.l ROM VERSION NUMBER. 
SAVE PROC 2 ROM VERSION NUMBER. 
CLEAR ANY UNWANTED BITS. 
CLEAR THE CARRY BIT. 

SHIFT THE COOES ALONG TO GET THE ROM 
VERSION NUMBER IN THE LOW 5 BITS. 

6$: MOV R2.R3 -SAVE PROC.l ROM VERSION NUMBER. 

s CLEAR ANY UNWANTED BITS. 
CLEAR THE CARRY BIT. 
SHIFT THE CODE ALONG TO GET THE ROM 

VERSION NUMBER IN Th€ LOW 5 BITS. 
CHECK IF WE HAVE RECEIVE PR0C_2 ROM CODE. 
GO REPORT BOTH ROM VERSION NUMBERS. 

i RECEIVED ROM VERSION NUMBERS OUT OF SEQUENCE. 

I IE. PROC.l' S ROM VERSION NUMBER FOUND IN THE FIFO BEFORE PR0C_2'S. 



MOV 0EM1403.R1 

MOV «1402..ERRNBR 

BR 12 S 

8( : DEC R5 

BNE 2t 

MOV 4EM1404.R1 

MOV «1403. .ERRN6R 

BR 12 » 



; SELECT THE ERROR MESSAGE TO BE REPORTED. 
J SET THE ERROR NUMBER. 
;G0 REPORT ERROR. 

DECREMENT THE MAX TRY COUNTER. 

LOOP TO GET THE NEXT CHAR FROM THE FIFO. 

SELECT THE ERROR MESSAGE TO BE REPORTED. 
(SET THE ERROR NUMBER. 
:GIVE UP. GO REPORT ERROR. 



IF THIS IS THE FIRST PASS. AND SOFTWARE P-TABLE QUESTION WAS ANSWERED YES. 
THEN REPORT THE ROM VERSION NUMBERS TO THE OPERATOR. 



10$: BIT OBITO, OPTION 

BEQ 60» 

CMP PASCNT.*! 
BGT 60$ 
PRINTB »£F1401.R3,R4 



J CHECK ON THE STATE OF THE SOFTWARE SWITCH. 
•.EXIT IF NO ROM VERSION PRINTOUT WAS REQUESTED. 
; CHECK IF THIS IS THE FIRST PASS. 

jEXIT IF ROM VERS HAVE ALREADY BEEN REPORTED. 
sPRINT THE ROM VERSION NUMBERS. 

MOV R4.-(SP) 

MOV R3.-(SP) 

MOV <>Eri401. -CSP) 

MOV *3.(SP) 



BR 601 
ERROR REPORTS: 

•ER1401.ERRBLK 
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03156^ 010600 
0S1S64 104414 
0S1566 062706 000010 

6003 0S1S72 000412 

6004 t 

6005 t 

6006 I - 
b(y>7 0S1S74 012767 016^54 152S72 121: 
60C 9 031402 

031402 104460 
60* 9 031404 000405 
eO 0 

60.1 031406 012767 002575 

60.2 031414 004767 171052 
6C13 

64 14 031420 

031420 012700 000340 
031424 104441 

6915 031426 005067 150654 CLR CTRLCF 

f016 031432 ENOrST 
031432 

031432 104401 



B13 

PAGE lis 2 



152554 50$ J 



601: 



MOV 
ERROR 

BR 

MOW 
JSR 



60 » 

01405. .ERRNBR 
PC.TSABRT 



SETPRI •PRI07 



lEXlT THIS TEST. 



MOV 

TRAP 

ADO 



SP.RO 
CfPNTB 
•10. SP 



J SELECT THE ERROR REPORTING ROUTINE. 
iREPORT ERROR. >>>>> ERROR '<<<< 



TRAP 



»SET UP ERROR NUMBER FOR TSABRT RTN. 
jREPORT NON TEST RELATED ERROR, 

iDISABLE ALL INTERRUPTS. 

MOV 
TRAP 

I INDICATE THAT UE COMPLETED THE TEST. 



Ct ERROR 



L 10045: 



TRAP 



•PRI07.ro 
CISPRI 



ciersT 



'^EQ 1^7 



CI 5 



CZ0HU8O OHL« U 
HARDWARE T(ST 



bOlS 
6019 
60^0 
6021 
6022 
6023 
6024 
6025 
6026 
6027 
6026 
002«» 



6050 



6031 
603^ 
6033 
6034 
6035 
6036 
6037 
603A 
6039 
6040 
6041 
6042 
6043 
6044 
6045 
6046 
6047 
6048 
6049 
6050 
6051 
6052 
6053 
6054 
60b5 
6056 
6057 
6058 
6059 
6060 
6061 
6062 
6063 
6064 
6065 
6066 
6067 
6066 
6069 
6070 
6071 
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031454 
051454 
031434 
031434 
031440 



031442 
031450 
031456 
031464 
031472 
031500 



031506 
031512 
C31516 
031520 
031524 
031530 



031532 
031536 



031544 

031550 
031554 



031556 
031562 
031566 

051572 



012700 
104441 

00001' 
012767 
012767 
012767 
012767 
012767 
012767 



.SBTTL HARDWARE TEST 



CSRB4 



CSR BIT 4 TEST 

THIS TEST VERIFIES THAT WHEN THIS BIT IS SET (.-^T THE SAME TIME 
AS MASTER RESET) THE OUT REMAINS INACTIVE WITH THE MASTER RESET 
BIT SET I AND WHEN CSR BIT 4 IS SUBSEQUENTLY CLEARED. THE BOARD 
BECOMES ACTIVE AND REPORTS SIX SKIP SELF TEST COOES IN THE RXFIFO. 
ANY BMP CODES FOUND IN THE FIFO ARE SAVED TO BE REPORTED LATER. 



000240 



000017 
177777 
000001 
002735 
012155 
016136 



012701 011610 

012702 000040 
005003 

016704 150516 

004767 166550 
103115 



005267 152232 
012777 000060 



017700 150472 
032700 000020 
001477 



005267 152206 

012701 012574 

004767 166506 
103470 



150654 
150630 
152302 
152276 
152272 
152266 



BGNTST 
SETPRI 



TNUM 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 



•PRIOS 



• TNUH » 1 
•TNUM.TSTNUM 
t l.CTRLCF 
•l.ERRTYP 
•1501..ERRNBR 
•EM1501.ERRMSG 
•ERCSOS.ERRfaLK 



i ALLOW LTC INTERRUPTS. 



TIS: 



MOV 
TRAP 



•PRI05.K0 
C»SPRI 



I INCREMENT THE ASSMBLY TIME TEST COUNTER. 

I SET UP THE TEST NUMBER. 

(INDICATE THAT WE ARE WITHIN A TEST. 

I SET ERROR TYPE AS FATAL IN ERROR TABLE. 

iSET THE ERROR NUMBER TO 1501. 

iSET THE ERROR MESSAGE ADJR. 

sSET THE ERROR REPORTING ROUTINE. 



J WAIT FOR THE MASTER RESET BIT TO CLEAR, 
; TO CLEAR. 



REPORT THE ERROR IF IT FAILS 



MOV #5000. .Rl iSET THE TIME-OUT VALUE OF 5 SEC. 

MOV •BIT05.R2 iINDICATE TO TEST BIT 5. 

CLR R3 I INDICATE TO TEST FOR BIT CLEAR. 

MOV CSRA.R4 I INDICATE TO TEST THE CSR REG. 

JSR PC.MSLOOP iWAIT FOR THE BIT TO CLEAR 

BCC 50f I JUMP TO REPORT ERROR IF BIT FAILED TO CLEAR. 



SET THE MASTER RESET AND CSR BIT 4 BIT' 
THAT THE MR BIT DOESN'T CLEAR. 



AND THEN WAIT 5.5 SECb TO ENSURE 



150476 



INC 
MOV 



ERnNBR 
•60.8CSRA 



! VERIFY THAT CSR BIT 4 IS SET. 



MOV 
BIT 
6EQ 



aCSRA.RO 

«BIT04.R0 

401 



i SET THE ERROR NUMBER TO 1502. 
(RESET THE BOARD WITH BIT 4 SET. 



(READ THE CSR. 
iTEST BIT 4, 

lEXlT WITH ERROR IF THE BIT IS CLEAR. 



I ♦ 



WAIT 5 SECOfSDS FOR THE MR BIT TO CLEAR. 



INC 
MOV 
JSR 
BCS 



ERRNBR 
•5500.. Rl 
PC.MSLOOP 
40* 



I SET THE ERROR NUMBER TO 1503. 
iSET THE TIME-OUT VALUE OF 5.5 SECS. 
tWAIT FOR THE MASTER RESET BIT TO CLEAR. 
;REPORT THE ERROR IF THE MR BIT CLEARED. 



DL5 
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<;eo is*) 



6072 








6C75 








0:4 


031574 


017705 


150442 


t>075 


031600 


042705 


000020 


6076 


031604 


010577 


150452 


t>077 








6070 








6079 








6080 


031610 


005267 


152154 


6081 


031614 


017705 


150422 


6002 


031620 


052705 


000020 


0O8S 


031624 


001055 




6084 








6085 








6086 








6087 


031626 


005267 


152156 


6088 


031632 


012701 


000764 


6089 031636 


004767 


166456 


6090 031642 


105044 




6091 








6092 








6093 








6094 








6095 








6096 


031644 


012767 


017126 


6097 


031652 


012701 


015241 


A AAA 

6098 








X. AAA 

6099 


031656 


012704 


000006 


X 1 'XA 

6100 








X. 4 A 4 

6101 


031662 


012767 


002742 


6102 


A V « f YA 

031670 


017702 


150550 


Ol03 


051674 


100033 




6104 


AV 4 X YX 

031676 


010205 




0 




042705 


177400 


6106 


051704 


012705 


000501 


6107 


051710 


040505 




6108 


051712 


001003 




6109 


051714 


004767 


170556 


6110 


051720 


000760 




6111 








6112 


051722 


020527 


000205 


6113 


051726 


001407 




6114 








6115 








6116 








6117 


051750 


005267 


152054 


6118 


051754 
051754 


104460 




6119 








6120 








6121 








6122 








6123 


051756 


052767 


000100 


6124 


051744 


001411 




6125 








6126 


051746 


005504 




6127 


031750 


001 S44 





152122 



150260 



CLEAR CSR BIT 4 AND VERirr THAT THE MASTFR RESET BIT ALSO CLEARS. 

MOV 8CSRA.R5 iREAO THE CSR. 

BIC •BIT04.R5 iCt-EAR BIT 4. 

MOV R5.9CSRA iRESTQRE THE CONTENTS OF THE CSR. 



I VERIFY THAT CSR BIT 4 CLEARED. 
I 



INC 
MOV 
BIT 
BNE 



ERRNBR 
8CSRA.RS 
9BIT04.R5 
40< 



lUAIT FOR THE BIT TO CLEAR. 

INC ERRNBR 

MOV 4500.. Rl 

JSR PC.MSLOOP 

BCC 40 ( 



iSET THE ERROR NUMBER TO 1504. 
J RE AO THE CSR. 
J TEST BIT 4 

(BRANCH AND REPORT cRROR IF SET. 



I SET THE ERROR NUMBER TO I50b. 
iSET A TIME-OUT OF 1/2 SECS. 
lUAIT FOR THE MR BIT TO CLEAR. 
I JUMP AND REPORT ERROR. 
J MR BIT FAILED TO CLEAR. 



I READ SIX CHARACTERS FROM THE RXFIFO AND VERIFY THEY ARE SKIP SELF TEST 
I COOES. SAVE ANY BMP COOES FOUND TO BE REPORTED LATER. 

I - 



152100 2t: 



4ti 



I 



MOV •ER9008.ERRBLK 

MOV ♦EM9024.RI 

MOV 46., R4 

MOV 41506. .ERRNBR 

MOV aR6UFA.R2 

BPL 50 < 

MOV R2.R5 

BIC •177400. R3 

MOV ♦SOl.RS 

BIC R3.R5 

BNF. 4( 

JSR PC.SAVBMP 

BR 2« 

CMP R5.4205 

BEG 6t 



SET UP THE ERROR ROUTINE. 
SET THE ERROR MESSAGE, 

"IMPROPER SELF TEST CODE FOUND". 
SET THE NUMBER OF CHARS TO READ. 

SET THE ERROR NUMBER TO 1506. 

READ A CODE FROM THE RXFIFO. 

EXIT WITH ERROR IF THE FIFO IS EMPTY. 

COPY THE CODE. 

CLEAR THE LINE NUMBER AND ERROR FLAGS. 
SET THE BMP CODE MASK. 
CHECK IF THE CODE IS A BMP CODE. 
AVOID SAVING THE BMP CODE IF IT ISN T. 
SAVE THE B^*> CODE. 

AVOID COUNTING THIS CODE. AND BRANCH 
rO READ MORE DATA FROM THE RxFIFO. 
IS THE CODE A SKIP SELF TEST ? 
1 BRANCH TO AVOID THE ERROR IF IT IS. 



, REPORT UNEXPECTED SELF TEST CODE FOUND. 

' INC ERRNBR iSET THE ERROR NUMBER TO 1507. 

ERROR (REPORT THE ERROR. 

llF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED THEN EXIT 
J THE TEST WITH THE TEST FAILURE MESSAGE. 



TMAP 



CtERROR 



6$: 



BIT 4BIT06. OPTION 

BEQ 60* 

DEC R4 

BNE 2t 



jHrtS EXTENDED ERROR REPORTING BEEN REQLCbTED 
lEXlT THE TEST IF IT HASN'T. 

(DECREMENT THE CODE COUNT. 

(BRANCH AND READ ANOTHER CODE IF NOT ALv. 



tl3 
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bl28 






612«» 031752 


000406 


elSv 












6192 






Ol9S 






O ' 5* 












else 






eiA ' 




l/lC 'VI 


else 














v9i /ev 


lU44eV 


oi*o 






6141 


















6144 


051764 


AAA 7J>7 
WW* /e > 


6145 






6146 


051770 


005067 


6147 






6148 


051774 
051774 






051774 


104401 



BR 



60* 



I HAVE BEEN READ 

J OTHERWISE. EXIT THE TEST, THE OUT HAS PASSED 
sTHlS TEST. 



, REPORT THE ERROR "CSR BIT 4 BAD" AND EXIT THIS TEST, 



:SET UP THE EXTENDED ERROR MESSAGE A^. 

"CSR BIT 4 BAD". 
{REPORT THE ERROR. 

TRAP CtERROR 

»EXIT THE TEST. 



40»: HOV •EM1502.RI 

ERROR 

BR 60 » 

'{ REPORT A NON -RELATED TEST ERROR. 
ioi: JSR PC.TSABRT {REPORT THE ERROR. 

60$: CLR CTRLCF {INDICATE THAT UE ARE NOT UITHIN A TEST. 

ENOTST 

L 10044: 

TRAP C»ETST 



61S0 
6151 
6152 
6153 
6154 
6)55 
6156 
6157 
6158 
6159 



TST 



reGurp 
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VQ 161 



6160 



6161 
6162 
616S 
t>i64 
6165 
6166 
0167 
6168 
6169 
6170 
6171 
6172 
6173 
61 ■'4 
6175 
6176 
6177 
6178 
6179 
6180 
6181 
6182 
6183 
6184 
6185 
6186 
6187 
6188 
6189 
6190 
6191 
6192 
6193 
6104 

6195 
6196 
6197 
6198 
6199 
6200 
6201 
6202 



051776 
051776 
051776 
051776 
032002 

032004 
032012 
052020 
032026 
032034 
052042 
052046 
052052 
052056 



032062 
032066 
032070 



032074 
052100 
032104 
052110 
032112 
032114 
032120 
032122 

032124 
032132 
032134 
032136 
032136 



032140 
032146 

032150 
032152 



012700 
104441 

000020 
012767 
012767 
012767 
012767 
012767 
005067 
012700 
004767 
005067 



004767 
103402 
000167 



005267 
012702 
016704 
010214 
011401 
042701 
020102 
001412 

012767 
005003 
005005 

104460 



032767 
001433 

005302 
002356 



HARDWARE TEST - REGURU 

- DEVICE REGISTER WORD ACCESS READ AND WRITE TEST • 



.SBTTL 
*** 

t* 

i* THIS TEST VERIFIES THAT THE DEVICE REGISTERS CAN BE READ AND WRITTEN 

i* CORRECTLY USING WORD ACCESSES. 

J* 



000240 



000020 
177777 
000001 
003101 
012304 
150414 
002464 
165746 
150222 



167270 
000142 



1S1670 
000017 
150132 



177760 



150312 
150266 
151740 
151734 
151730 



BGNTST 
SE7PRI *PRI05 



TNUM TNUM ♦ 1 

MOV ♦TNUM.TSTNUM 

MOV »-l.CTRLCF 

MOV Ol.ERRTYP 

MOV 41601. .ERRNBR 

MOV «EM1604 , ERRMSG 

Clr ERSMRF 

MOV «ERCNTB.R0 

JSR PC.CLR16W 

CLR EXOERR 



T16: : 

jA'.LOW THE LTC TO INTERRUPT. 

MOV 4PRI05.ro 
TRAP CISPRI 

J INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

J SET UP THE TEST NUMBER. (16) 

f INDICATE THAT WE ARE WITHIN A TEST. 

;SET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 

I SET UP ERROR NUMBER IN THE ERROR TABLE. 

(SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 

I CLEAR THE ERROR SUMMARY FLAGS. 

; CLEAR THE ERROR COUNTER TABLE. 
! CLEAR THE "EXIT ON ERROR" FLAG 



RfSET THE OUT TO A KNOWN STATE, 00 NOT REMOVE THE STATUS CODES FROM THE FIFO. 

CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERRORS >>>>> 1601 <<<<<. 



JSR 
BCS 
JMP 



PC.RESETT 
60$ 



;RESET THE OHU-11. REPORT ANY ERRORS FOUND. 
(FATAL RESET ERROR? NO. CONTINUE WITH TEST. 
(YES. EXIT THE TEST. 



VERIFY READ/WRITE CAPABILITY TO INOIREC ADDRESS FIELD OF CSR 



2»: 



016416 151642 



INC 
MOV 
MOV 
MOV 
MOV 
BIC 
CMP 

BEQ 
(REPORT • 
MOV 
CLR 
CLR 

ERROR 



ERRNBR (SET THE ERROR REPORT NCTBER TO 1602. 

♦17. R2 (SET LOOP COUNT. 

CSHA.R4 (GET CSR ADDRESS. 

R2.(R4) (WRITE COUNT TO CSR. 

(R4).R1 (READ BACK THE CONTENTS OF THE CSR 

♦177760. Rl (MASK OUT ALL BUT THE INO.AOR.REG FIELD. 

R1.R2 (CHECK FOR CORRECT DATA WRITTEN/READ. 

4$ (IS EXPECTED DATA BAD? NO. SKIP ERROR REPORT. 
BAD BIT(S) IN DEVICE CSR REGISTER FOR LINE 0 (0), 



♦ER1601.ERRBLK 

R3 

R5 



(SELECT THE PROPER ERROR REPORT ROL'TINE. 
(SET OFFSET fO 0 TO CAUSE REPORT OF CSR REG. 
(CAUSE REPORT OF LINE 0. 
( >>>>> ERROR ♦ 1602 <<<<< 

TRAP CIERROR 



000100 150056 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN REQUESTED. 



4$: 



BIT ♦6IT06. OPTION 

BEQ 60 » 

DEC R2 

6GE 2$ 



(HAS EXTENDED ERROR BEEN REQUESTED ? 
(EXIT THE TEST IF IT HASN'T. 

(DECREMENT LOOP COUNT/INO.ADD.REG ADDRESS. 
(LOOP BACK TO TEST NEXT ADDRESS IF NOT DONE, 



Gi3 
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b20l 
620A 
6205 
6206 
6207 
6208 
6209 
6210 
6211 
6212 
621S 
o214 
6215 
6216 
6217 
6218 
6219 
6220 
6221 
6222 
6223 
6224 
6225 
6226 
6227 
6228 
6229 
6230 
6231 
6232 
6233 
S234 
6235 
6236 
6237 
6236 
6239 
6240 



032154 
052160 
032162 
032166 



0321 72 
032176 



032200 
032206 
032210 
032212 



052216 
032222 



032224 
032232 
032236 
032242 
032242 
032242 



005267 
005003 
012704 
004767 



005767 
001017 



012767 
005003 
005404 
004767 



005767 
001005 



012767 
004767 
005067 



104401 



151610 

000002 
166704 



150106 



003106 
166660 

150062 



003111 
167072 
150044 



151562 



WRITE ANO VERIFr 16 DATA PATTERNS IN ALL USED BITS OF ALL REGISTERS ON ALL 
ACTIVE LINES. BEFORE 'JRITING EACH PATTERN. CLEAR ALL THE BITS. 
REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1603 1605 

INC ERRNBR sSET THE ERROR NUMBER TO 1603. 

CLR R3 i INDICATE '^HAT WORD ACCESSES ARE TO BE USED, 

MOV •2,R4 J INDICATE R/W ACCESS, CLEAR FIRST. 

JSR PC. REGTST j WRITE ANO VERIFY DATA PATTERNS. 

EXIT THE TEST IF AN ERROR HAS BEEN FOUND ANO EXTENDED ERROR REPORTING HAS 
NOT BEEN REQUESTED, I.E. EXOERR IS NON ZERO. 



TST 
BNE 



EXOERR 
601 



J IS THE "EXIT ON ERROR" FLAG SET 
:EXIT IF IT IS. 



WRITE ANO VERIFY 16 UATA PATTERNS IN ALL USED BITS OF ALL R^iGISTERS ON ALL 
ACTIVE LINES. BEFORE WRITING EACH PATTERN, SET ALL THE BITS. 
REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>»> ERROR 1606 - 1608 



MOV «1606. .ERRNBR 

CLR R3 

NEG R4 

JSR PC. REGTST 



i SET UP ERROR NUMBER FOR REGTST ROUTINE, 
s INDICATE THAT WORD ACCESSES ARE TO BE USED. 
; INDICATE R/W ACCESS. SET FIRST, 
;URITE ANO VERIFY DATA PATTERNS, 



EXIT THE TEST IF AN ERROR 
NOT bEEN REQUESTED. I.E. 



i - 



TST 
BNE 



EXOERR 
601 



HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
EXOERR IS NON-ZERO, 

J IS THE "EXIT ON ERROR' FLAG SET ? 
;EXIT IF IT IS. 



PRINT ERROR SUMMARY REPORTS IF NECESSARY. 

THE FOLLOWING ROUTINE REPORTS ERRORS WITH NUMBER >>>>> ERROR 9 1609 <<<<< 



151536 



60$: 



MOV 
JSR 

CLR 
ENDTST 



»1609. .ERRNBR 

PC.REPSMR 

CTRLCF 



:SET UP ERROR NUMBER FOR NEXT RTN. 
(REPORT ERROR SUMMARY IF NECESSARY. 
(INDICATE THAT WE COMPLETED THE TEST. 



L 10045: 



TRAP 



C*ETST 



HJ 5 
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''-.EQ 16S 



t>242 
62*5 
6244 
6245 
6246 
6247 
6248 
6249 
6250 
6251 

6252 



625S 
6254 
6255 
6256 
6257 
6258 
6259 
6260 
6261 
6262 
6263 
6264 
6265 
6266 
6267 
6268 
6269 
6270 
6271 
6272 
6273 
6274 
6275 
6276 
6277 
6278 
6279 
6280 
6281 
6282 
6283 
6284 
6285 
6286 
6287 
6288 
6289 
6290 
6291 
6292 
6293 
6294 
6295 



032244 
032244 
032244 
032244 
032250 

032252 
03226C 
032266 
032274 
032302 
032310 
032314 
032320 
032324 



032530 
032334 
032336 



032542 
032350 
032352 
032356 



032362 
032366 



012700 
104441 
000021 
012767 
012767 
012767 
012767 
012767 
005067 
012700 
004767 
005067 



000240 



000021 
177777 
000001 
003245 
012360 
150146 
002464 
165500 
147754 



150044 
150020 
151472 
151466 
151462 



004767 167022 
103402 

000167 000064 



012767 003247 
005003 

012704 000001 

004767 166514 



005767 147716 
001017 



151420 



.SBTTL HARDWARE (EST 



REGURM 



- DEVICE REGISTER UORO ACCESS REAO/MODIFy/uRITE TEST 



*■ THIS TEST VERIFIES THAT THE DEVICE REGISTERS CAN BE WRITTEN CORRECTLY 
t* USING UORO REAO/HODIFY /WRITE ACCESSES, 
s ♦ 



BGNTST 
SETPRI 9PRI05 



TNUM TNUM ♦ 1 

MOV •TNUM.TSTNUM 

MOV ♦-I.CTRLCF 

MOV •l.ERRTYP 

MOV «1701. .ERRNBR 

MOV «EM1701.ERRMSG 

CLR ERSHRF 

MOV «ERCNT8,R0 

JSR PC.CLR16U 

CLR EXOERR 



T17: • 

sALLOW THE LTC TO INTERRUPT!' 

MOV 0PRI05.ro 
TRAP CtSPRI 

; INCREMENT THE ASSEMBLY TIME TEST COLWTER. 

8 SET UP THE TEST NUMBER. C17) 

I INDICATE THAT UE ARE WITHIN A TEST. 

iSET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 

I SET UP ERROR NUMBER IN THE ERROR TABLE. 

;SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 

jCi-EAR THE ERROR SUMMARY FLAGS. 

s CLEAR THE ERROR COUNTER TABLE. 
;CLEAR THE "EXIT ON ERROR" FLAG 



( ♦ 



RESET THE OUT TO A KNOWN STATE. 00 NOT REMOVE THE STATUS COOES FROM THE FIFO. 

CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERRORS >>>>> 1701 <<<<<. 



JSR 
BCS 
JflP 



PC.RE^TT 

.*6 

60 1 



iRESET THE OHU-11. REPORT ANY ERRORS FOUND. 
iFATAL RESET ERROR? NO. CONTINUE WITH TEST. 
;YES. EXIT THE TEST. 



I ♦ 



THE READ/MOOIFY/WRITE CAPABILITY TO INDIRECT ADDRESS FIELD OF CSR IS 
NOT TESTED THIS THIS FORK OF ACCESS IS ILLEGAL. 



: WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL REGISTERS ON ALL 
J ACTIVE LINES USING R/M/W. BEFORE WRITING EACH PATTERN. CLEAR ALL THE BITS, 
; REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1703 - 1705 <<<<<, 



NOV «1703. .ERRNBR 

CLR R3 

nOV «1.R4 

JSR PC. REGTST 



i SET THE ERROR NUMBER TO 1703. 
{INDICATE THAT WORD ACCESSES ARE TO BE 
(INDICATE R/M/U ACCESS. CLEAR FIRST. 
tURITE AND VERIFY DATA PATTERNS. 



USED. 



EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
NOT BEEN REQUESTED. I.E. EXOERR IS NON-ZERO. 



TST 
BNE 



EXOERR 
601 



tIS THE "EXIT ON ERROR" FLAG SET ? 
jEXIT IF IT IS. 



; WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL REGISTERS ON ALL 
! ACTIVE LINES USING R/M/W. BEFORE WRITING EACH PATTERN. SET ALL THE BITS. 
I REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>* ERROR I70o 1708 <<«<<, 
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164 



6296 








6297 


032370 


012767 


003252 


6296 


032376 


005003 




6299 


032400 


005404 




6300 


0*.2402 


004767 


166470 


630i 








€-302 








6303 








6304 








6505 


032406 


005767 


147672 


6306 032412 


001005 




6307 








6308 








C309 








6310 








6311 








6312 


032414 


012767 


003255 


6313 


032422 


004767 


166702 


6314 


032426 


005067 


147654 


6315 


032432 
032432 
032432 


104401 





151572 



151346 



MOV #1706. .ERRNBR 

CLR R3 

NEG R4 

JSR PC.REGTST 



J SET UP ERROR NUMBER FOR REGTST RQUTItC 
i INDICATE THAT WORD ACCESSES ARE TO BE USED. 
I INDICATE R/M/U ACCESS, SET FIRST. 
tURITE AND VERIFY DATA PATTERNS. 



t * 



EXIT THE TEST IF AN ERROR HAS BEEN fqunD AND EXTENDED ERROR REP0RTir« HAS 
NOT BEEN REQUESTED, I.E. EXOERR IS NGN ZERO. 



TST 
BNE 



EXOERR 
60* 



5 IS THE "EXIT ON ERROR' 
sEXiT IF IT IS. 



FLAG SET ? 



: PRINT ERROR SUMMARY REPORTS IF NECESSARY. 

i THE FOLLOWING ROUTINE REPORTS ERRORS WITH NUMBER 



>>>>> ERROR * 1709 <<<<< 



MOV *1709. .ERRN8R 

JSR PC.REPSMR 

60* : CLR CTRLCF 
ENOTST 



SET UP ERROR NUMBER FOR NEXT RTN. 
REPORT ERROR SUMMARY IF NECESSARY. 
INDICATE THAT UE COMPLETED THE TEST. 



L 10046: 



TRAP 



CIETST 
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<i£Q 165 



6317 
6310 
6319 
6320 
6321 
6322 
6325 
6324 
6325 
6S26 

6327 



6320 
6329 
6330 
6331 
6332 
6333 
6334 
6335 
6336 
6337 
6338 
6339 
6340 
6341 
6342 
6343 
6344 
6345 
6346 
6347 
6348 
6349 
6350 
6351 
6352 
6353 
6354 
6355 
6356 
6357 
6358 
6359 
6360 
6361 
6362 

6363 
6364 
6365 
6366 
6367 
6368 
6369 



032520 
032524 
032526 
032532 



032540 
032544 
032550 
032552 
032554 
032560 
032562 

032564 
032572 
032574 
032576 
032576 



032600 
032606 



HARDWARE TEST - REGBRU 

- DEVICE REGISTER BYTE ACCESS READ AND WRITE TEST 



.SBTTL 

!* 

't* THIS TEST VERIFIES THAT THE DEVICE REGISTERS CAN BE READ AND WRITTEN 
i« CORRECTLY USING BYTE ACCESSES. 

2* 



032454 








032434 








032434 








032434 


012700 


000240 




032440 


104441 

000022 






032442 


012767 


000022 


147654 


032450 


012767 


177777 


147630 


032456 


012767 


000001 


151302 


032464 


012767 


003411 


151276 


032472 


012767 


012443 


151272 


0S2SOO 


005067 


147756 




032504 


012700 


002464 




032510 


004767 


165310 




032514 


005067 


147564 





BGNTST 
SETPRI «PRI05 



TNUM TNUM ♦ 1 

MOV »TNUri,TSTNUM 

MOV •-1.CTRLCF 

MOV tfLERRTYP 

MOV «1801. .ERRNBR 

MOV 4EM1801 . ERRMSG 

CLR ERSMRF 

MOV 4ERCNTB.R0 

JSR PC.CLR16W 

CLR EXOERR 



T18: : 

; ALLOW THE LTC TO INTERRUPT. 

MOV «PRI05.R0 
TRAP CtSPRI 

(INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

I SET UP THE TEST NUMBER. (18) 

: INDICATE THAT WE ARE WITHIN A TEST. 

(SET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 

(SET UP ERROR NUMBER IN THE ERROR TABLE. 

(SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 

(CLEAR THE ERROR SUMMARY FLAGS. 

(CLEAR THE ERROR COUNTER TABLE. 
(CLEAR THE "EXIT ON ERROR" FLAG. 



( RESET THE OUT TO A KNOWN STATE. DO NOT REMOVE THE STATUS CODES FROM THE FIFO. 
( CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
{ THIS SUBROUTINE REPORTS ERRORS >>>>> 1801 <<<<<. 



004767 166632 
103402 

000167 000212 

012767 003412 



151230 



JSR PC.RESETT 

BCS . *6 

JMP 60> 

MOV •1802.. ERRNBR 



(RESET THE OHU-11. REPORT ANY ERRORS FOJ40. 
(FATAL RESET ERROR? NO. CONTINUE WITH TEST. 
(YES. EXIT THE TEST. 
(SET THE ERROR REPORT NUMBER TO 1802. 



012702 
016704 
110214 
111401 
042701 
020102 
001412 

012767 
005003 
005005 

104460 



032767 
001456 



000017 
147472 



177760 



016416 151202 



TvERIFY READ/WRITE CAPABILITY TO INDIRECT ADDRESS FIELD OF CSR. 
{ USE BYTE ACCESSES. 

MOV •17.R2 (SET LOOP COUNT. 

MOV CSRA.R4 (GET CSR ADDRESS. 

2»: MOVB R2.(R4) (WRITE COUNT TO CSR. 

N0V6 (R4).R1 (READ BACK THE CONTENTS OF THE CSR 

BIC #177760. Rl (MASK OUT ALL BUT THE INO.ADR.REG FIELD. 

CMP R1.R2 (CHECK FOR CORRECT DATA WRITTEN/READ. 

BEQ 4$ (IS EXPECTED DATA BAD? NO. SKIP ERROR REPORT. 

(REPORT "BAD BIT(S) IN DEVICE CSR REGISTER FOR LINE 0 (0) 



MOV 
CLR 
CLR 
ERROR 



»ER1601.ERRBLK 
R3 
R5 



(SELECT THE PROPER ERROR REPORT ROUTINE. 
(SET OFFSET TO 0 TO CAUSE REPORT OF CSR REG. 
(CAUSE REPORT OF LINE 0. 
, >>>>> ERROR ♦ 1802 <<<<< 

TRAP CtERROR 



i ♦ 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



000100 147416 



BIT «BIT06. OPTION 
BEQ 60S 



(EXIT WITH TEST FAILURE MESSAGE IF 

sNO EXTENDED ERROR REPORTING HAS BEEN RFQUESTED 

(DURING TKC SOFTWARE QUESTIONS. 
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HARDWARE TEST 



6570 
6371 
65 7^ 
6375 
6574 
6375 
6376 
6377 
6378 
6379 
6360 
e381 
6382 
6363 
6384 
6385 
6386 
6387 
6366 
6389 
6390 
6391 
6392 
6393 
6394 
6395 
6396 
6397 
6396 
6399 
6400 
6401 
6402 
6403 
6404 
6405 
6406 
6407 
6406 
6409 
6410 
6411 
6412 
6413 
6414 
6415 
6416 
6417 
6418 
6419 
6420 
6421 
6422 
6423 
6424 
6425 
6426 



032610 
032612 



032614 
032620 
032624 
032630 



032634 
032640 



032642 
032650 
032652 



032656 
032662 



032664 
032672 
032674 
032676 



032702 
032706 



RFGBRU 



005302 
002356 



4$: 



DEC 
BGE 



R2 
2» 



I DECREMENT LOOP COUNT /INO. ADD. REG ADDRESS. 
:L00P BACK TO TEST NEXT ADDRESS V NOT DONE. 



005267 151150 

012703 177777 

012704 000002 
004767 166242 



005767 147444 
001041 



WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL LOWER BYTES OF ALL 
REGISTERS ON ALL ACTIVE LINES. USE READ/WRITE ACCESSES. BEFORE WRITING 
EACH PATTERN. CLEAR ALL THE USED BITS OF AIL ACTIVE REGISTERS. 
REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1605 1805 <<<<<. 



INC 
MOV 
MOV 
JSR 



ERRNBR 
•-1.R3 
«2.R4 

PC. REGTST 



SET THE ERROR NUMBER TO 1803. 

INDICATE THAT LO BYTE ACCESSES ARE TO BE USED. 
INDICATE R/W ACCESS. CLEAR FIRST. 
WRITE AND VERIFY DATA PATTERNS. 



i ♦ 



s EXIT THF TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
NOT BEEN REQUESTED. I.E. EXOERR IS NON-ZERJ. 



TST 
BNE 



EXOERR 
60$ 



lis THE "EXIT ON ERROR- FLAG SET ? 
jEXIT IF IT IS. 



I WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL HIGH BYTES OF ALL 
1 REGISTERS ON ALL ACTIVE LINES. USE READ/WRITE ACCESSES. BEFORE WRITING 
EACH PATTERN. CLEAR ALL THE USED BITS OF ALL ACTIVE REGISTERS. 
REGTST ROUTINE REPORTS ERRORS WITH I^JMBERS >>>>> ERROR 1806 - 1808 *<<<< 



012767 003416 
005403 

004767 166220 



005767 147422 
001030 



151120 



MOV « 1806. .ERRNBR 
NEG R3 
JSR PC. REGTST 



sSET UP ERROR NUMBER FOR REGTST ROUTINE. 

! INDICATE THAT HI BYTE ACCESSES ARE TO BE USED. 

} WRITE AND VERIFY DATA PATTERNS. 



: EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
t NOT BEEN REQUESTED. I.E. EXOERR IS NON-ZERO. 



TST 
BNE 



EXOERR 
60$ 



J IS THE "EXIT ON ERROR" FLAG SET ? 
{EXIT IF IT IS. 



012767 003421 

005403 

005404 

004767 166174 



005767 147376 
001016 



151076 



WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF At.L LOWER BYTES OF ALL 
REGISTERS ON ALL ACTIVE LINES. USE READ/WRITE ACCESSES. BEFORE WRITING 
EACH PATTERN. SET ALL THE USED BITS OF ALL ACTIVE REGISTERS. 
REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1809 - 1811 <<<<<. 



MOV «1609. .ERRNBR 

NEG R3 

NEG R4 

JSR PC. REGTST 



tSET UP ERROR NUMBER FOR REGTS1 ROUTINE. 
♦.INDICATE THAT LO BYTE ACCESSES ARE TO BE USED. 
! INDICATE R/W ACCESS. SET FIRST. 
J WRITE AND VERIFY DATA PATTERNS. 



EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
NOT BEEN REQUESTED. I.E. EXOERR IS NON-ZERO. 



TST 
BNE 



EXOERR 

eo$ 



lis THE "EXIT ON ERROR" FLAG SET ? 
lEXIT IF IT IS. 



I WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL HIGH BYTES OF ALL 

I REGISTERS ON ALL ACTIVE LINES, USE REAO/WRITE ACCESSES. BEFORE WRITING 

I EACH PATTERN. SET ALL THE USED BITS OF ALL ACTIVE REGISTERS. 

! REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1812 1814 



032710 012767 003424 151052 



; 



MOV 



♦1812. .ERRNBR iSET UP ERROR NUMBER FOR REGTST ROUTINE. 



6427 
6426 
6429 
6450 
6431 
6432 
6433 
6434 
6435 
6436 
6437 
6436 
6439 
6440 
6441 
6442 



032716 
032720 



0327?4 
032730 



032732 
032740 
032744 
032750 
032750 
032750 



rUNC TST 



005403 
004767 



005767 
001005 



012767 
004767 
005067 



104401 



PARTI 
- REGBRU 
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«^EQ 167 



147354 



003427 
166364 
147336 



151030 



MEG R3 (INDICATE THAT MI BYTE ACCESSES ARE TO BE USED. 

JSR PC.REGTST ;URITE AND VERIFY DATA PATTERNS. 



( ♦ 



EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
NOT BEEN REQUESTED, I.E. EXOERR IS NON-ZERO. 



TST 
BNE 



EXOERR 
60 ( 



lis THE "EXIT ON ERROR" FLAG SET ? 
lEXlT IF IT IS. 



PRINT ERROR SUMMARY REPORTS IF NECESSARY. 

THE FOLLOWING ROUTINE REPORTS ERRORS WITH NUMBER >>>>> ERROR « 1815 <<<<< 



60ti 



MOV 
JSR 

CLR 
ENOTST 



«181S. .ERRNBR 

PC.REPSMR 

CTRLCF 



J SET UP ERROR NUMBER FOR NEXT RTN. 
(REPORT ERROR SUMMARY IF NECESSARY. 
(INDICATE THAT UE COMPLETED THE TEST, 



L 1004 7: 



TRAP 



C»ETST 
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6444 
6445 
6446 
644 7 
6448 
6449 
6450 
6451 
6452 
645S 



REGBRM 



<;E0 168 



6454 



6455 
6456 
6457 
6458 
6459 
6460 
6461 

6465 
6464 
6465 
6466 
6467 
6468 
6469 
6470 
6471 
6472 
6473 
6474 
6475 
6476 
6477 
6476 
6479 
6460 
6481 
6462 
6463 
6464 
6465 
6486 
6487 
6468 
6489 
6490 
6491 
6492 
6493 
6494 
6495 
6496 
6497 



032752 
032752 
032752 
032752 
032756 

032760 
032766 
032774 
033002 
033010 
033016 
035022 
033026 
USS032 



033036 
033042 
033044 
053050 



033056 
033062 
033066 
033072 



033076 
033102 



012700 
104441 

000023 
01^ ^67 
012767 
012767 
012767 
012767 
005067 
012700 
004767 
005067 



.SBTTL HARDWARE TEST REGBRM 

,* - DEVICE REGISTER BYTE ACCESS READ/MODIF Y/URITE TEST 

|t THIS TEST VERIFIES THAT THE DEVICE REGISTERS CAN BE READ AND WRITTEN 
i* CORRECTLY USING BYTE ACCESSES IN REAO/HODIFY /WRITE MODE. 

*************************************************************************** 



000240 



000023 
177777 
000001 
003555 
012517 
147440 
002464 
164772 
147246 



004767 166314 
103402 

000167 000136 

012767 003557 



005267 150706 

012703 177777 

012704 000001 
004767 166000 



005767 147202 
001041 



147336 
147312 
150764 
150760 
150754 



BGNTST 
SETPRI «PRI05 



TNUM TNUM f 1 

MOV OTNUM.TSTNUM 

MOV *-l,CTRLCF 

MOV Ol.ERRTYP 

MOV 01901. .ERRNSR 

MOV *EM1901,EftRMSG 

CLR ERSMRF 

MOV «ERCNTB.RO 

JSR PC.CLR16W 

CLR EXOERR 



T19: : 

s ALLOW THE LTC TO INTERRUPT. 

MOV 0PRI05.R0 
TRAP C$SPRI 

t INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

sSET UP THE TEST NUMBER. (19) 

s INDICATE THAT WE ARE WITHIN A TEST. 

J SET UP DEVICE FATAL INDICATOR IN ERROR TYPE. 

:SET UP ERROR NUMBER IN THE ERROR TABLE. 

;SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 

{CLEAR THE ERROR SUMMARY FLAGS. 

;CLEAR THE ERROR COWTER TACLE. 
jCLEAR THE "EXIT ON ERROR" FLAG. 



RESET THE OUT TO A KNOWN STATE. 00 NOT REMOVE THE STATUS COOES FROM THE FIFQ, 

CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERRORS >>>>> 1901 <<<<<. 



150712 



JSR PC.RESETT 

BCS . »6 

JMP 60$ 

MOV «1903. .ERRNBR 



jRESET THE DHU- 11, REPORT ANY ERRORS FOUND. 
, FATAL RESET ERROR? NO. CONTINUE WITH TEST. 
;YES. EXIT THE TEST. 
;SET THE ERROR REPORT NUMBER TO 1903. 



THE READ/MODIFY /WRITE CAPABILITY TO INDIRECT ADDRESS FIELD QF CSR IS NOT 
TESTED SINCE THIS IS AN ILLEGAL FORM OF ACCESS TO THIS REGISTER. 



WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL LOWER BYTES OF ALL 
REGISTERS ON ALL ACTIVE LINES. USE READ/MOOIFY/WRITE ACCESSES. BEFORE 
WRITING EACH PATTERN. CLEAR ALL THE USED BITS OF ALL ACTIVE REGISTERS. 
REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1903 - 1905 <<<<<. 

INC ERRNBR iSET THE ERROR NUMBER TO 1903. 

MOV 0-1.R3 {INDICATE THAT LO BYTE ACCESSES ARE TO BE USED. 

MOV 01. R4 {INDICATE R/M/W ACCESS. CLEAR FIRST. 

JSR PC, REGTST s WRITE AND VERIFr DATA PATTERNS. 

EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
NOT BEEN REQUESTED. I.E. EXOERR IS NON-ZERO. 



TST 
BNE 



EXOERR 
60 » 



;IS THE "EXIT ON ERROR" FLAG SET ? 
{EXIT IF IT IS. 



{ WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL HIGH BtTES OF ALL 
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033104 
033112 
033114 



033120 
033124 



HARDWARE TEST 



6498 

6499 

6500 

6501 

6502 

6503 

6504 

6505 

6506 

6507 

6508 

6509 

6510 

6511 

6512 

6513 

6514 

6515 

6516 

6517 

6516 

6519 

6520 

6521 

6522 

6523 

6524 

6525 

6526 

6527 

6528 

6529 

6530 

6531 

6532 

6533 

6534 

6535 

6536 

6537 

6538 

6539 

6540 

6541 

6542 

6543 

6544 

6545 

6546 

6547 

6548 

6549 



033126 
033134 
033136 
033140 



033144 
033150 



033152 
033160 
033162 



033166 
033172 



033174 
033202 
033206 
033212 
033212 
033212 



012767 
005403 
004767 



005767 
001030 



012767 
005403 
005404 
004767 



005767 
001016 



012767 
005403 
004767 



005767 
001005 



012767 
004767 
005067 



104401 



REGBRn 

003562 
165756 

147160 



«iEO 169 



REGISTERS ON ALL ACTIVE LINES. USE READ/MQDIFY/URITE ACCESSES. BEFORE 
WRITING EACH PATTERN. ClEAR ALL THE USED BITS OF ALL ACTIVE REGISTERS. 
REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>■>>> ERROR 1906 - 1908 <<<<<, 



150656 



MOV 01906. .ERRNBR 
NEG R3 
JSR PC. REGTST 



;SET UP ERROR NUMBER FOR REGTST ROUTINE. 

; INDICATE THAT HI BYTE ACCESSES ARE TO BE USED. 

t WRITE AND VERIFY DATA PATTERNS. 



EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
NOT BEEN REQUESTED. I.E. EXOERR IS NON ZERO. 



TST 
BNE 



EXOERR 
60 » 



:IS THE "EXIT ON ERROR" FLAG SET ? 
sEXIT IF IT IS. 



WRITE AND VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL LOWER BYTES OF ALL 
REGISTERS ON ALL ACTIVE LINES. USE READ/MODIFY /WRITE ACCESSES. BEFORE 
WRITING EACH PATTERN, SET ALL THE USED BITS OF ALL ACTIVE REGISTERS. 
REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1909 - 1911 <<<<<, 



003565 
165732 

147134 



150634 



MOV 01909. .ERRNBR 

NEG R3 

NEG R4 

JSR PC. REGTST 



SET UP ERROR NUMBER FOR REGTST ROUTINE. 
INDICATE THAT LO BYTE ACCESSES ARE TO BE USED. 
INDICATE R/M/W ACCESS. SET FIRST. 
WRITE AND VERIFY DATA PATTERNS. 



EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
NOT BEEN REQUESTED. I.E. EXOERR IS NON-ZERO. 



TST 
BNE 



EXOERR 
60« 



sis THE "EXIT ON ERROR" FLAG SET ? 
sEXIT IF IT IS. 



WRITE A.*'D VERIFY 16 DATA PATTERNS IN ALL USED BITS OF ALL HIGH BYTES OF ALL 
REGISTERS ON ALL ACTIVE LINES. USE READ/MODIFY/WRITE ACCESSES. BEFORE 
WRITING EACH PATTERN. SET ALL THE USED BITS OF ALL ACTIVE REGISTERS. 
REGTST ROUTINE REPORTS ERRORS WITH NUMBERS >>>>> ERROR 1912 - 1914 <<<<< 



003570 
165710 

147112 



003573 
166122 
147074 



150610 



MOV 01912. .ERRNBR 
NEG R3 
JSR PC. REGTST 



8 SET UP ERROR NUMBER FOR REGTST ROUTINE. 

i INDICATE THAT HI BYTE ACCESSES ARE TO BE USED. 

s WRITE AND VERIFY DATA PATTERNS. 



EXIT THE TEST IF AN ERROR HAS BEEN FOUND AND EXTENDED ERROR REPORTING HAS 
NOT BEEN REQUESTED. I.E. EXOERR IS NON-ZERO. 



TST 
BNE 



EXOERR 
60 f 



{IS THE "EXIT ON ERROR" FLAG SET ? 
sEXIT IF IT IS. 



150566 



PRINT ERROR SUMMARY REPORTS IF NECESSARY. 

THE FOLLOWING ROUTINE REPORTS ERRORS WITH NUMBER >>>>> ERROR 0 1915 <<<<< 



60$: 



MOV 
JSR 

CLR 
ENOTST 



01915. .ERRNBR 

PC.REPSMR 

CTRLCF 



SET UP ERROR NUMBER FOR NEXT RTN. 
REPORT ERROR SUMMARY IF NECESSARY. 
INDICATE THAT WE COMPLETED THE TEST, 



L 10050: 



TRAP 



C$ETST 
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6551 
6552 
6553 
6554 
6555 
6556 
655'' 
655a 
6559 



loeiT 



Bi4 
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6560 



6561 
6562 
656S 
6564 
6565 
6566 
6567 
6568 
6569 
6570 
6571 
6572 
6573 
6574 
6575 
6576 
6577 
6578 
6579 
6580 
6581 
6582 
6583 

6584 

6585 



035260 
0SS264 



033266 
033272 
035276 
033300 
033306 
033312 
033320 
033320 
033322 
033326 
033326 
033326 



.SBTTL HARDWARE TEST 



- loeiT 



- DEVICE REGISTER ID BIT TEST 
THIS TEST VERIFIES THAT THE DUT STAT REGISTER ID BIT READS AS SET, 



03S214 








035214 








033214 








055214 


012700 


000240 




033220 


104441 

000024 






033222 


012767 


000024 


14 7074 


035250 


012767 


177777 


147050 


035236 


012767 


000001 


150522 


035244 


012767 


003721 


150516 


055252 


012767 


012602 


150512 



BGNTST 
SETPRI OPRIOS 



THUM T'*JM ♦ 1 

MOV ♦T-*JM,TSTNUM 

MOV •-l.CTRLCF 

MOV ♦l.ERRTYP 

MOV •2001. .ERRNBR 

MOV •EM2001.ERRMSG 



T20: : 

I ALLOW THE LTC TO INTERRUPT. 

MOV •prio5.ro 

TRAP CISPRI 
J INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
I SET UP THE TEST NUMBER. (20) 
; INDICATE THAT WE ARE IN A TEST. 
iSET UP DEVICE FATAL INDICATOR IN ERROR TfPE. 
I SET UP ERROR NUMBER IN THE ERROR TABLE. 
I SET UP ERROR MESSAGE FOR TEST IN ERROR TABLE. 



004767 
103016 



017701 
052701 
001011 
012767 
012701 
0127^7 

104460 

005067 



104401 



166072 



146756 
000400 

005722 
012652 
016156 



146760 



150462 
150454 



I RESET THE DUT TO A KNOWN STATE, 00 NOT REMOVE THE STATUS COOES FROM THE FIFO, 
t CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
; THIS SUBROUTINE REPORTS ERRORS >>>>> 2001 <<«<«. 

' JSR PC.RESETT iRESET THE O'lU-ll. REPORT ANt ERRORS FOUND, 

see 60» iFATAL RESET ERROR? tES, EXIT THE TEST. 

!*READ THE STAT REGISTER 10 BIT AND VERIFY THAT IT IS CLEAR. 

* jREAD THE STAT REGISTER CONTENTS. 

iCHECK THE ID BIT. 
iIO BIT SET? YES. EXIT THE TEST. 
iNO. SET THE ERROR REPORT NUMBER TO 2002. 
iGET THE PROPER ERROR MESSAGE. 
I SELECT THE PROPER ERROR REPORT ROUTINE. 
lERROR NUMBER >>>>> 2002 <<<<< 

TRAP CtERRQR 
CTRLCF » INDICATE THAT WE COMPLETED THE TEST. 



MOV 
BIT 

BNE 
MOV 
MOV 
MOV 

ERROR 



SFSLSA.Rl 

•BIT8.R1 

601 

•2002. .ERRNBR 

•EM2002.R1 

•CR050S,ERR6LK 



60$! 



CLR 
ENDTST 
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TRAP 



CIETST 
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6587 
6588 
658«» 
6590 
6591 
6592 
6593 
6594 
6595 
6596 

6597 



6598 

6599 

6600 

6601 

6602 

6603 

6604 

6605 

6606 

6607 

6608 

6609 

6610 

6611 

6612 

6615 

6614 

6615 

6616 

6617 

6618 

6619 

6620 

6621 

6622 

6623 

6624 

6625 

6626 

6627 

6628 

6629 

6630 

6631 

6632 

6633 

6634 

6635 

6636 

6637 

6638 

6639 

6640 



033330 
033330 
033330 
OS33SO 
033354 

033336 
033544 

055352 
055360 
033366 
033374 



033402 
035406 



035410 
055414 
055420 
055424 
035430 
035434 
035440 
033444 
035450 



035454 
035460 
035462 
055470 
053474 



0127 0 
104441 

000025 
012767 
012767 
012767 
012767 
012767 
012767 



004767 
105114 



016705 
012700 
004767 
012700 
004767 
012704 
004767 
012705 
004767 



012703 
005004 
012767 
030567 
001455 



000240 



000025 
177777 
000001 
004375 
012725 
017222 



164574 



146760 
146734 
150406 
150402 
150376 
150572 



146614 

000200 
170126 
177670 
170146 
000012 
164460 
177777 
167224 



000001 

004376 
146534 



.SBTTL HAROUARE TCST 



TXENBI 



- TX. ENABLE (INACTIVE) TEST 
THIS TEST VERIf^IES THAT WHEN THE LINE UNDER TEST'S TX ENABLE BIT IS 
CLEAR. TRANSMISSION WILL NOT TAKE PLACE ON THAT LINE. 
THIS TEST IS PERFORtCO IN INTERNAL LOOPBACK. AND ON ALL ACTIVE LINES. 



BCNTST 
liETpRI 



TNUM 

nov 

MOV 
MOV 
MOV 
MOV 
MOV 



•PRI05 



" TNUM ♦ 1 
•TNUri.TSTNUM 
♦-1.CTRLCF 
•l.ERRTYP 
42301. .ERRNBR 
•EM2301.ERRMSG 
«ER9101.ERRBLK 



T21 • • 

lALLOM LTC INTERRUPTS. 

MOV ♦PRI05,«0 
TRAP CiSPRI 

{INCREMENT THE ASSEMBLY TIME TEST COUNfER, 

jSET UP THE TEST NUMBER. (23) 

{INDICATE THAT UE ARE IN A TEST. 

I SET ERROR TYPE AS FATAL IN ERROR TA8Lt. 

iSET THE FIRST ERROR NUMBER IN ERROR TABLE. 

I SET ERROR MESSAGE ADDRESS IN ERRTBL . 

I SELECT THE CORRECT ERROR REPORTING ROUTINE. 



I RESET THE OUT TO A KNOWN STATE, REMOVE THE STATUS COOES FROM THE FIPQ. 
I CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
» THIS SUBROUTINE REPORTS ERROR >>>»> 2301 <<<<<. 

JSR PC.CLNRST iRESET THE DMU-ll. REPORT ANr ERRORS FOUND. 

BCC 601 iRESET FAILURE?. ABORT THIS TEST. 

! SET INTERNAL LOOPBACK ON ALL ACTIVE LINES. 

I SET LPR ON ALL LINES TO 38. 4K BAUD. 8 BITS PER CHARACTER. GOD PARITY. 
I 2 STOP BITS. 

t ENABLE TRANSMITTERS ON ALL LINES. 

' iPASS THE ACTIVE LINE BIT MAP. 

iPASS THE LNCTRL CONTENTS. 
J INITIALISE THE LNCTRL REGISTERS. 
jPASS THE LPR CONTENTS. 

iINITIALSE THE LPR REGISTERS ON ALL LINES. 
I PASS DELAY TIME OF 10 MILL I -SECONDS. 
I WAIT FOR LNCTR AND LPR REGS TO BE UPDATED. 
{PASS THE BIT MAP CORRESPONDING TO ALL LINES. 
(ENABLE TRANSMITTERS ON ALL LINES. 

I TEST ALL ACTIVE LINES INDIVIDUALLY. 

i DISABLE TRANSMISSION ON EACH ACTIVE LINE. 



MOV 


ACTLNS.R5 


MOV 


•200.ro 


JSR 


PC.WTWLNC 


MOV 


♦177670. RO 


JSR 


PC.WTWLPR 


MOV 


•10.. R4 


JSR 


PC. DELAY 


MOV 


•MAPLNS,R5 


JSR 


PC.TXENBL 



150300 21: 



MOV •l.RS 

CLR R4 

MOV •2502. .ERRNBR 

BIT R5.ACTLNS 

BEQ 6« 



»SET UP THE LINE BIT MAP FOR CHANNEL 0. 

I CLEAR THE LINE NUMBER COUNTER. 

I SET THE ERROR NUMBER TO 2302. 

I CHECK IF THE LINE IS ACTIVE. 

iSKIP TESTING THIS LINE IF IT IS INACTIVE, 



t CLEAR THE TX ENABLE BIT IN TBUFFAD2 REGISTER. 
I SELECT THE LINE UNDER TEST. 

VERIFY IT IS CLEAR. REPORT ERROR IF SET. 

I 
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^£0 17c; 



6641 
6641 
6642 
6644 
6645 
6646 
664 7 
6646 
6649 
66S0 
6651 
6652 
66S5 
6654 
6655 
6656 
6657 
66Sa 
6659 
6660 
6661 
6662 
6663 
6664 
6665 
6666 
6667 
6666 
6669 
6670 
6671 
6672 

6673 
6674 
6675 
6676 
6677 

6678 
6679 
6680 
6681 
6682 
6663 
6684 
6685 
6686 
6687 
6688 



0354 76 
OS3500 
033504 
033510 
033514 



033U16 
033524 
033532 
033536 
033542 
033546 



033550 
033554 
033560 
033564 
033570 
033572 
033576 
033602 

035604 
033606 

033612 
033612 

033614 
033622 



033624 
033626 
03363C 
033632 
033636 

033640 
033644 
033644 
033644 



010477 
005777 
100433 



012/67 
112777 
012701 
016702 
004767 
103416 



005267 
012701 
016702 
004767 
103405 
005267 
017702 
100010 

010401 
012702 



104460 

032767 
001406 



000241 
006103 
005204 
020427 
002711 

005067 



104401 



167100 
146532 
146542 



004377 150244 
000012 146516 
170003 
146500 
167522 



150214 
070012 
146456 
167500 

150172 
146442 



4t: 



012772 



000100 146402 



R3.RS (PASS THE BIT MAP QF THF LINE UNDER TEST. 

PC.TXOSBL lOISABLE TR<«NSMISSION ON THE LINE UNDER TEST. 

R4.8CSRA iSELECT THE LINE CURRENTLY UNDER TEST. 

STXAD2A I VERIFY THE TX.ENABLE BIT IS SET. 

4k iGG REPORT ERROR IF T/.ENABLE BIT SET. 



MOV 
JSR 

noj 

TST 
BMI 

TmRITF data byte (ASCII <LF>) TO THE OUTPUT FIFO, 
s UAIT »-0R A TX.ACTION TO BE RETURNED. REP0R1 ERROR IF A TX ACTION 
t IS FOUND BEFORE riHE-OUT OCCURS. 
I 



MOV #2303. .ERRNBR 

MOVB «12.aFDATA 

MOV »17OO03.Rl 

MOV CSRA.R2 

JSR PC.UAIBIS 

BCS 4t 



iSET ERROR NUMBER TO 2303. 
lURITE THE DATA BYTE TO THE OUT'S OUTPUT FIFO. 
iTEST BIT 15. TIMEOUT OF 5 MILLI SECS. 
iPASS THE ADDRESS OF THE REGISTER TO TEST. 
lUAIT FOR TX.ACTION TO COME BACK. 
<G0 REPORT ERROR IF A TX -ACTION FOUND. 



s » 



WAIT FOR THE DATA TO APPEAR IN THE FIFO. REPORT ERROR IF DATA FQUND. 



INC FRRNBR 

MOV «70012.R1 

MOV CSRA.R2 

JSR PC.WAIBIS 

BCS 4t 

INC ERRNBR 

MOV aRBUFA.R2 

BPL 6) 

MOV R4.R1 

MOV •EM2302,R2 

ERROR 



BIT «eiT06. OPTION 
BEQ 60 < 



tSET ERROR NUMBER TO 2304. 

I TEST BIT 7. TIMEOUT OF 10 MiLLi SECS. 

jPASS THE ADDRESS OF THE REGISTER TO TEST. 

iUAIT FOR RX DATA AVAILABLE TO SET. 

.•REPORT ERROR IF DATA RECEIVED IN THE FIFO. 

tSET ERROR NUMBER TO 2305. 

{READ THE DATA FROM THE FIFO. 

(SKIP ERROR REPORT IF DATA ISN'T THERE. 

J PASS THE NUMBER OF CURRENT LINE UNDER TEST. 
|OASS THE MESSAGE TO BE REPORTED. 
I "TX.ENABLE BIT BAD ON LINE: »tf«". 
t > > > > > ERROR <<<<<. 

TRAP CtERROR 

lEXIT THE TEST. UlTH THE TEST FAILED MESSAGE. 
tIF EXTENDED ERROR REPORTING HAS NOT BEEM 
(REQUESTED. 



I ♦ 



( VERIFY ALL ACTIVE LINES HAVE BEEN TESTED. 



000020 
146442 



I - 
6»; 



60f I 



CLC 
ROL 
INC 
CMP 
BLT 



R3 
R4 

R4.9NUMLNS 

2t 



CLR CTRLCF 
ENDTST 



(CLEAR The carry BIT PRIOR TO ROTATION. 
(SHIFT THE BIT MAP FOR THE NEXT LINE. 
(INCREMENT THE LINE NUMBER COUNTER. 
(HAVE ALL THE LINES BEEN TESTED?. 
(N0{ BRANCH TO TEST THE NEXT LINE. 

(INDICATE THAT UE ARE NOT WITHIN A TEST. 

L 10052: 

TRAP C«E TbT 



I rune TST P 



6690 
b6«»l 
669^ 
6693 
6^94 
6695 
6696 
6697 
6696 
6699 

6700 



6701 
6702 
6705 
6704 
6705 
6706 
6707 
670a 
6709 
6710 
6711 
6712 
6713 
6714 
6715 
6716 
6717 
671S 
6719 
6720 
6721 
6722 
6723 
6724 
6725 
6726 
6727 
6726 
6729 
6730 
6731 
6732 
6733 
6734 
6735 
6736 
6737 
6738 
6739 
6740 
6741 
6742 
6743 



NBA 
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033646 
033646 
033646 
033646 
03S652 

033654 
C3S662 
053670 
033676 
055704 
055712 



053720 
055724 



035726 
055752 
055756 
055742 
055746 
055752 
055756 
055762 
055766 



053772 
033776 
054000 
054006 
034012 



012700 
104441 

000026 
012767 
012767 
012/67 
012767 
012767 
012767 



016705 
012700 
004767 
012700 
004767 
012704 
004767 
012705 
004767 



000240 



000026 
177777 
000001 
004541 
015050 
017222 



004767 164056 
105155 



146276 
000200 
167610 
177670 
167630 
000012 
164142 
177777 
166612 



146442 
146416 

150070 
150064 
150060 
150054 



012705 000001 
005004 

012767 004542 147762 
050567 146216 
001467 



S8TTL HARDWARE TEST 



TXENBA- 



TX.ENABLC C ACTIVE) TEST 
THIS TEST VERI^"IES THAT WHEN THE TX.ENABLE BIT IS SET IN THE APPRORIATE 
LINE REGISTER. TRANSMISSION WILL TAKE PLACE ON THAT LINE. 
THIS TEST IS PERrORHEO IN INTERNAL LOOPBACK. AND ON ALl. ACTIVE LINES. 



BGNTST 
SETPRI 



TNUM 

nov 

MOV 
MOV 
MOV 
MOV 
MOV 



«PRI05 



• TNUM » 1 
♦TNUM.TSTNUM 
♦ I.CTRlCF 
•l.ERRTYP 
«2401. .ERRNBR 
«EM2401,ERRMSG 
•ER9101.ERRBLK 



T22' • 

; ALLOW Lie INTERRUPTS. 

MOV «PRI05.R0 
TRAP CtSPRI 

I INCREMENT THE ASSEMBLY TIME TEST COONTEM. 

J SET UP THE TEST NUMBER. (24) 

I INDICATE ▼HAT WE ARE IN A TEST. 

iSET ERROR TYPE AS fATAL IN ERROR TABLE. 

iSET THE FIRST ERROR NUMBER IN ERROR TABLE. 

I SET ERROR MESSAGE ADDRESS IN ERRTBL. 

iSELECT THE CORRECT ERROR REPORTING ROUTINE. 



RESET THE OUT TO A KNOWN STATE. REMOVE THE STATUS CODES FROM THE FIFO 

CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERROR >>>>> 2401 <<<<<. 



JSR 
6CC 



PC.CLNRST 
601 



iRESET THE OHU-11. REPORT ANY ERRORS FO'JND. 
iRESET FAILURE?. ABORT THIS TEST. 



: SET INTERNAL LOOPBACK ON ALL ACTIVE LINES. 

t SET LPR ON ALL LINES TO 58. 4K BAUD. 8 BITS PER CHARACTER. 000 PARITi. 
J 2 STOP BITS. 

t DISABLE TRANSMITTERS ON ALL LINES. 

iPASS THE ACTIVE LINE BIT MAP. 
iPASS THE LNCTRL CONTENTS. 
(INITIALISE THE LNCTRL REGISTERS. 
iPASS THE LPR CONTENTS. 

lINITIALSE THE LPR REGISTERS ON ALL LINES. 
J PASS DELAY TIME OF 10 MILL I -SECONDS. 
iWAIT FOR LNCTR AND LPR REGS TO BE UPDATED. 
sPASS THE BIT MAP CORRESPONDING TC ALL uINES. 
:DISABLE TRANSMITTERS ON ALL LINES. 

TEST ALL ACTIVE LINES INDIVIDUALLY. 
ENABLE TRANSMISSION ON EACH ACTIVE LINE. 



MOV 


ACTLNS.R5 


MOV 


»200.R0 


JSR 


PC.WTWLNC 


MOV 


♦1776 70. RO 


JSR 


PC.WTWLPR 


MOV 


♦10.. R4 


JSR 


PC. DEL AY 


MOV 


♦MAPLNS.R5 


JSR 


PC.TXDSBL 



MOV «1.R5 

CLR R4 

2»: MOV «2402. .ERRNBR 

BIT R5.ACTLNS 

BEQ 6« 

t * 



J SET UP THE LINE BIT MAP FOR CHANNEL 0. 

I CLEAR THE LINE NUMBER COUNTER. 

iSET THE ERROR NUMBER TO 2402. 

; CHECK IF THE LINE IS ACTIVE. 

{SKIP TESTING THIS LINE IF IT IS INACTI\,E, 



J SELECT THE LINE UNDER TEST. 
; SET THE TX ENABLE BIT IN TBUFFAD2 REGISTER. 
J VERIFY IT IS SET. REPORT ERROR IF CLEAR. 



6 744 


034014 


010305 




6745 


034016 


004767 


166656 


6746 


034022 


012705 


000012 


6747 


034026 


010477 


146210 


6746 


034032 


005777 


146220 


6749 


034036 


100045 




6750 








6751 








67b2 








6753 








6754 








6755 


034040 


012767 


004543 


6756 


034046 


112777 


000012 


6757 


034054 


012701 


170004 


6758 


034060 


016702 


146156 


6759 


034064 


004767 


167200 


6760 


034070 


103030 




6761 








6762 








6763 








6764 


034072 


005267 


147672 


6765 


034076 


012701 


070012 


6766 


03<102 


016702 


146134 


6767 


034106 


004767 


167156 


6768 


034112 


103017 




6769 


034114 


005267 


147650 


6770 


034120 


017702 


146120 


6771 


034124 


100012 




6772 


034126 


005267 


147636 


6773 


034132 


000302 




6774 


034134 


042702 


177760 


6775 


034140 


020204 




6776 


034142 


001003 




6777 


034144 


005305 




6778 


034146 


00133* 




6779 


034150 


000410 




6780 








6781 


034152 


010401 




6782 


034154 


012702 


012772 


6783 








6784 


034160 
034160 


104460 




6785 








6786 


034162 


032767 


000100 


6787 


034170 


001411 




6788 








6789 








6790 








6791 








6792 


034172 


010305 




6793 


034 174 


004767 


166404 


6794 


034200 


000241 




6795 


034202 


006103 




6796 


034204 


005204 




6797 


034206 


020427 


000020 


6798 


034212 


002672 




6799 









6<: 



VE 



6>: 



Fi4 



MOV R3.R5 jPASS THC BIT MA^ Of THE LINt UNDER TEST. 

JSR PCTVENBL j ENABLE TRANSMISSION ON THE LINF UNDER fEST. 

MOV »10..R5 :SET TXCMAR/LOOP COUNT TO 10. 

MOV R4.8CSRA J SELECT THE LINE CURRENTLY UNDER TEST. 

TST aTXA02A jVtRIFY THE TX.ENABLE BIT IS St7. 

BPL 6» jGO REPORT ERROR IF T/ .ENABLE BIT CLEAR. 

i WRITE DATA BYTE CASCII <LF>) TO OUTPUT FIFO, 

, WAIT FOR A TX.ACTION TO BE RETURNED. REPORT ERROR IF NO TX ACTION 

; FOUND BEFORE TIME OUT OCCURS. 

' MOV »2403. .ERRNBR ;SET ERROR NUMBER TO 2403. 

MOVB •12.aFDATA j WRITE THE DATA BYTE TO THE OUT'S OUTPUT FIFO. 

MOV »170004.R1 jTEST BIT 15. TIMEOUT OF 4 MILLI SECS. 

MOV CSRA.R2 jPASS THE ADDRESS OF THE REGISTER TO TEST. 

JSR PC.UAIBIS ;UAIT FOR TX.ACTION TO COME BACK. 

BCC 6t iGO REPORT ERROR IF NO TX ACTION FQUNO. 

!*WAIT FOR THE DATA TO APPEAR IN THE FIFO, REPORT ERROR IF TIME-OUT. 

INC ERRNBR -.SET ERROR NUMBER TO 2404, 

MOV »70012.R1 jTEST BIT 7. TIMEOUT OF 10 MiLLi SECS. 

MOV CSRA.R2 ;PASS THE ADDRESS OF THE REGISTER TO TEST, 

JSR PC.UAIBIS ;WAIT FOR RX.DAl A.AVAILABLE TO SET. 

BCC 6» {REPORT ERROR IF NO DATA RECEIVED IN THE FIFO. 

INC ERRNBR :SET ERROR r«J»«ER TO 2405. 

MOV aRBUFA,R2 (READ THE DATA FROM THE FIFO. 

BPL 6t }G0 REPORT ERROR IF THER IS' NT ANY DATA THERE. 

INC ERRNBR tSET ERROR NUMBER TO 2406. 

SWAB R2 5 PUT THE LINE NUMBER IN THE LOU BYTE. 

BIC 4177760. R2 j CLEAR THE UNWANTED BITS. 

CMP R2.R4 I DID THE DATA COME FROM THE CORRECT LINE?. 

BNE 6« sNOs GO REPORT THE ERROR. 

DEC R5 {DECREMENT THE TXCHAR/LOOP COUNTER. 

BNE 4t {LOOP TO TX THE NEXT CHAR. 

BR 8$ iGO TEST THE NEXT LINE. 

MOV R4.R1 {PASS THE NUMBER OF CURRENT LINE UNDER TEST. 

MOV •eN2302.R2 {PASS THE MESSAGE TO BE REPORTED. 

t"TX ENABLE BIT BHD ON LINE: NN' . 

ERROR 8 > > > > > ERROR <<<<<. 

TRAP CJERROR 

BIT ♦BIT06.0PTI0r^ ,EXIT THE TEST IF EXTENDED ERROR REPORTING 

BED 60» »MAS NOT BEEN ENABLED. SINCE THE TEST HAS FAILED. 



t ALL ACTIVE LINES HAVE BEEN TESTED. 

MOV R3.R5 {PASS THE BIT MAP OF THE LINE UNDER TEST. 

JSR PC.TXDSBL {CLEAR THE TX.ENABLE BIT ON THIS LINE. 

CLC {CLEAR THE CARRY BIT PRIOR TO ROTATION. 

RX R5 {SHIFT THE BIT MAP FOR THE NEXT LINE. 

INC R4 {INCREMENT THE cINE NUMBER COUNTER. 

CMP R4,#NUMLNS {HAVE ALL THE LINES BEEN TESTED?. 

BLT 2$ (N0{ BRANCH TO TEST THE NEXT LINt. 



G14 
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oflOO 0*4214 005067 146066 60»: CLrt CTRLCf i INDICATE THAT UE ARE NOT WITHIN A TEST. 

6901 054220 ENDTST 

034220 L 10055: 

054220 104401 TRAP CIETST 



CZOMUBO OMU II rUNC TST PARTI 
HARDWARE TEST - INTA 



6803 
6804 
6805 
6806 
6807 
6800 
6809 
6810 
6811 
6812 
681S 
6814 
6815 
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6816 



6817 
6818 
6819 
6820 
6821 
6822 
6823 
6824 
6825 
6826 
6827 
6828 
6829 
6830 
6831 
6832 
6833 
6834 
6835 
6836 
6837 
6838 
6839 
6840 
6841 
6842 
6843 
6844 
6845 
6846 
6847 



034222 
034222 
034222 
034222 
034226 

034230 
034236 
034244 
034252 
034260 



034266 
034272 
034274 
034300 



034306 
034312 



6648 



034316 
034322 
034326 
034332 
034540 
034340 
034344 
034350 
034354 
034360 
034362 
034366 
034366 
034372 



012700 
104441 
000027 
012767 
012767 
012767 
012767 
012767 



005067 
005067 
005067 
012767 

012746 
012746 
016746 
012746 
104437 
062706 

012746 
012746 



000240 



000027 
177777 
000001 
003101 
013073 



146066 
146042 
147514 
147510 
147504 



004767 165064 
103402 

000167 001044 

012767 005053 



012705 177777 
004767 166362 



147462 



145772 
145770 
145774 
002726 

000300 
024036 
145656 
000003 

000010 

000300 
023660 



145742 



.SBTTL HARDWARE TEST 



INTA 



I* 



- INTERRUPT TEST - 
THIS TEST VERIFIES THAT THE DEVICE UNOEP TEST (DUT) WILl GENERATE 
RECEPTION AKO TRANSMISSION INTERRUPTS CORRECTLY. THIS TEST DOES 
NOT DEPEND ON THE USE OF THE SERIAL LINE "TRANSMISSION OR RECEPTION 
CAPABILITIES OF THE DUT. THE LINES ARE PUT IN INTERNAL LOOPBACK 
TO MINIMIZE ANY EXTERNAL EFFECTS THAT COULD BE CAUSED ON DEVICES 
ATTACHED TO THE SERIAL LINES. 



BGNTST 
SETPRI 



TNUM 

MOV 

MOV 

W)V 

MOV 

MOV 



«PRI05 



■ TNUM ♦ 1 
•TNUM.TSTNUM 
•-1.CTRLCF 
•l.ERRTYP 
•1601..ERRNBR 



T23: : 

1 ALLOW THE LTC TO INTERRUPT, 

MOV •PRI05.ro 
TRAP CISPRI 
I INCREMENT THE ASSEMBLY TIME TEST COUNTER. 
I SET UP THE TEST NUMBER. (26) 
I INDICATE THAT WE ARE IN A TEST. 
{SET ERROR FATAL ERROR TYPE IN ERROR TABLE. 
I SET FIRST ERROR REPORT NUMBER IN ERROR TABLE. 



4EM2601. .ERRMSG -.SET TEST ERROR MESSAGE IN ERROR TABLE. 



RESET THE DUT TO A KNOWN STATE. 00 NOT REMOVE THE STATUS COOES FROM THE FIFO. 

CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERRORS FROM >>>>> 2601 THRU 2602 <<<<<. 



2i: 
i* 



JSR PC.RESETT 

BCS 21 

JMP 60» 

MOV •2603. .ERRNBR 



; RESET THE DHU-11. REPORT ANY ERRORS FOUND. 
-.SKIP AROUND ABORTING TEST IF NO ERROR FOUND. 
: ABORT TEST IF FATAL ERROR FOUND DURING RESET. 
;SET THE ERROR REPORT NUMBER TO 2603. 



ENABLE TRANSMITTERS ON ALL LINES. 



i - 

4$! 



MOV AMAPLNS.RS tPASS ACTIVE LINE BIT MAP. 

JSR PC.TXENBL :ENABLE TRANSMISSION ON ALL LINES. 



TEST RECEPTION INTERRUPTS. 

SET UP FOR RX AND TX INTERRUPTS: 

RX INTERRUPT SERVICE ROUTINE INPUTS A CHAR AND COUNTS THE INTERRUPT. 
TX INTERRUPT SERVICE ROUTINE COUNTS TX INTERRUPTS. 



CLR RXINTC 

CLR RXINTF 

CLR TXINTC 

MOV OBUFBAS.BUFPTR 

SCTVEC RXVECA.«RXINPT,«PRI06 



; CLEAR THE RX INTERRUPT COUNTER. 
I CLEAR THE RX INTERRUPT FLAGS. 

J Clear the tx interrupt counter. 

J LOAD THE BUFFER PTR WITH THE BUFFER BASE 
;SET UP INTERRUPT VECTOR 



ADR. 

TO CATCH RX INT, 



SETVEC TXVECA.#CACHTX.dPRI06 jSET UP INTERRUPT VECTOR 



MOV 
MOV 
MOV 
MOV 
TRAP 
ADD 
TO CATCH 
MOV 
MOV 



•PRI06. (SP) 
•RXINPT. -(SP) 
RXVECA, (SP) 
9$. iSP) 
CiSvEC 
• 10. Sf 
TX INT. 
•PRI06. (SP^ 
•CACHTx, vSP^ 





054376 


016746 


14!>652 




054402 


012746 


000005 




034406 


104437 






034410 


062706 


000010 


6049 


054414 








054414 


012700 


000200 




054420 


104441 




6650 








6051 








6652 








6655 








6654 








6655 


034422 


004767 


165624 


6656 


034426 


012704 


000004 


6657 


034432 


004767 


163466 


6656 


034436 


004767 


165550 


6659 








6660 








6661 








6662 








6663 


034442 


005767 


145646 


6664 


034446 


001017 




6665 








6666 








6667 








6666 


034450 


012701 


013310 


6669 


034454 


032777 


000200 


6670 


034462 


001416 




6671 


034464 


012701 


013222 


6872 


034470 


032777 


100000 


6673 


034476 


001410 




66"'1 


034500 


012701 


013131 


6675 


034504 


000405 




6676 








6877 








6678 








6679 


034506 


005767 


145604 


6880 


034512 


100014 




6661 


034514 


012701 


013404 


6882 








6663 








6884 








6685 


034520 








034520 


104455 






034522 


005053 






034524 


013073 






034526 


016136 




6886 








6867 








6868 








6689 








6690 








6891 


034530 


032767 


000100 


6692 


034536 


001002 




6893 


034540 


000167 


000556 


6694 









6895 
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SETPRI »PRI04 



iALLOU DEVICE INTERRUPTS. 



MOV 
MOV 
TRAP 
ADD 

MOV 
TRAP 



TXVECA, (SP) 
43. (SP) 
C»SVEC 
•10. SP 

ffPRI04.R0 
C»SPRI 



ENABLE RECEPTION INTERRUPTS. 

DELAY 4 MS TO ALLOW TIME FOR THE INTERRUPTS TO TAKE PLACE. 
DISABLE RECEPTION INTERRUPTS. 



JSR 

MOV 
JSR 
JSR 



PC.RXIEl 
•4,R4 
PC. DEL AY 
PC.RXIEO 



{ENABLE THE RECEPTION INTERRUPTS. 
jPASS 4 MS COUNT TO THE DELAY R0UTi:4E. 
(DELAY 4 MILLI SECONDS. 
(DISABLE RECEPTION INTERRUPT^. 



( VERIFY THAT THE CORRECT INTERRUPTS TOOK PLACE. 

{ TEST THE INT COUNTER TO VERIFY THAT INTERRUPTS TOOK PLACE. 



TST 
BNE 



RXINTC 
6< 



(CHECK THE RX INTERRUPT COUNT. 

(SKIP THE FOLLOWING ER:?0RS IF COUNT <> 0. 



DETERMINE REASON FOR NO RX INTERRUPTS AND PRINT PROPER ERROR MESSAGE. 



MOV •EM2604.R1 

BIT 4BIT7.SCSRA 

BEQ 8$ 

MOV 4EM2603.R1 

BIT 4BIT15.8RBUFA 

BEQ 8> 

MOV 4EM2602.R1 

BR 8< 



(SET UP MSG IN CASE "RX .DATA. AVAIL IS ClR' 
(TEST THE RX. DATA. AVAIL BIT OF THE CSR. 
(GO REPORT ERROR IF RX. DATA. AVAIL IS ClR. 
(SET UP MSG IN CASE "DATA. VALID IS CLEAR". 
(TEST THE DATA, VALID BIT OF THE FIFO. 
(GO REPORT ERROR IF DATA. VALID IS CLEAR. 
(SET UP MSG. "OAT A. VALID IS SET". 
(GO REPORT THE ERROR. 



IF RX INTS OCCURRED WITH RX. DATA. AVAIL CLEAR. REPORT THE ERROR. 

TST RXINTF (CHECK THE RX INTERRUPT FLAGS. 

BPL 10$ (SKIP THE ERROR IF FLAG IS CLEAR. 

MOV 4EM2605.R1 (SET UP THE PROPER MESSAGE. 



REPORT THE ERROR WHICH HAS BEEN FOUND. 
ERROF 2603 . EM260 1 . ER0503 ( 



> > > > > ERROR 42603 <<<<<. 

TRAP CSERDF 
.WORD 2603 
.WORD EM2601 
.WORD ER0505 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



BIT 4BIT06. OPTION 
BNE .*6 
JMP 34 ( 



{EXIT WITH TEST FAILURE MESSAGE IF 

|n0 extended ERROR REPORTING HAS BEEN RFQUEbTEO 



J14 



CZOHUBO OMO II 
HAROUARE TEST 



TUNC 



6896 
6897 
6898 
6899 
6900 
6901 
6902 



6903 
6994 
6905 
6906 
6907 
6908 
6909 
6910 
6911 
6912 
6913 
6914 
6915 



6916 



6917 



6918 
6919 
6920 
6921 
6922 
6923 
6924 
6925 
6926 
6927 



6928 



6929 



034624 
034630 
034634 
034640 
034640 
034644 
034650 
034654 
034660 
034662 
034666 
034666 
034672 
054676 
034702 
034706 
034710 
034714 
034714 



TST PARTI 
INTA 



034544 
034550 

034552 
034556 
034556 
034560 
034562 
034564 



034566 
034574 
034576 



034602 
034602 
034606 
034610 
054610 
034614 
034616 
034616 
034622 



016702 
001414 

012701 

104455 
005054 
013075 
016174 



052767 
001002 
000167 



012700 
104441 

016700 
104436 

016700 
104436 



005067 
005067 
005067 

012746 
012746 
016746 
012746 
104437 
062706 

012746 
012746 
016746 
012746 
104437 
062706 



145556 
007505 
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J VERIFY THAT NO TX INTERRUPTS HAVE BEEN GENERATED SO TAR iN THIS TEST. 

io$: HOV TXINTC.R2 iLOAD « OF TX INTERRUPTS FOR ER0504 RTN. 

BEQ 12) tSKIP ERROR IF NO TX INTERRUPTS. 

iREPORT "TX INTERRUPTS(S) RECEIVED WITH TX INTERRUPTS DISABLED." 
MOV «EM0526.R1 tSET UP MESSAGE ADR FOR INDIRECT PRINT. 

ERRDF 2604,EM2601.ER0504i >>>>> ERROR 02604 <<<<<. 

TRAP 
.UORD 
.UORD 
.UORD 

I EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



^eO 176 



C»ERDF 
2604 
EH2601 
ER0S04 



000100 
000520 



000300 
145416 
145412 



145430 



BIT 06IT06. OPTION 
BNE .»6 
JMP M» 



jEXIT WITH TEST FAILURE MESSAGE IF 

InO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 



I - 
12 » 



CLEAN OUT THE INTERRUPT VECTORS USED IN THIS TEST. 

SETPRI «PRI06 :DISABLE DEVICE INTERRUPTS. 



CLRVEC RXVECA 



CLRVEC TXVECA 



MOV 
TRAP 

•.RETURN RX INT VECTOR TO UNUSED POOL. 

MOV 
TRAP 

;RETURN TX INT VECTOR TO UNUSED POOL. 

MOV 
TRAP 



«PRI06.R0 
C$SPRI 

RXVECA. RO 
CtCVEC 

TXVECA. RO 
C$CVEC 



145464 
145472 
145470 

000300 
023632 
145356 
000003 

000010 

000300 
024146 
145332 
000003 

000010 



012700 000200 



; TEST TRANSMISSION INTERRUPTS. 

t SET UP FOR RX AND TX INTERRUPTS: 

s RX INTERRUPT SERVICE ROUTINE COUNTS RX INTERRUPTS. 

s TX INTERRUPT SERVICE ROUTINE COUNTS THE INTERRUPT AND SETS FLAGS. 

CLR RXINTC -.CLEAR THE RX INTERRUPT COUNTER. 

CLR TXINTC s CLEAR THE TX INTERRUPT COUNTER. 

CLR rxiNTF I CLEAR THE RX INTERRUPT FLAGS. 

SETVEC RXVECA,*CACHRX.#PRI06 jSET UP INTERRUPT VECTOR TO CATCH RX INT. 

MOV ♦PRI06.-(SP) 

MOV dCACHRX.-CSP) 

MOV RXVECA, -(SP) 

MOV 95. (SP) 

TRAP C»SVEC 

ADO 910.SP 

SETVEC TXVECA. •TXINTR,«PRI06 sSET UP INT VECTOR TO TX INT ROUTINE. 

MOV •PRI06.-(SP) 

MOV tfTXlNTR. CSP) 

MOV TXVECA. (SP") 

MOV ♦S.-CSP) 

TRAP C*SVEC 

ADD «10.SP 

SETPRI «PRI04 lALLOU DEVICE INTERRUPTS. 

MOV »PPI04.R0 
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1E0 179 



6930 
6931 
6932 



034720 104441 



TRAP 



C*SPRI 



VERIFY THAT THE TX.ACTION BIT IS CLEAR. 



6933 


034722 


012705 


000022 




nov 


6934 


034726 


012701 


000144 




nov 


6935 


034732 


012702 


100000 




MOV 


6936 


034736 


016704 


145300 




MOV 


6937 


034742 


012703 


100000 


14$: 


MOV 


6938 


034746 


004767 


163326 




JSR 


6939 


034752 


103026 






BCC 


6940 


034754 


005003 






CLR 


6941 


034756 


004767 


163316 




JSR 


6942 


034762 


103005 






BCC 


6943 


034764 


005305 






DEC 


6944 


034766 


001365 






BNE 


6945 










sREPORT "TX 


6946 


034770 


012701 


013526 




MOV 


6947 


034774 


000402 






BR 


6948 


034776 


012701 


013622 


161: 


MOV 


6949 


035002 
035002 
035004 
035006 
035010 


104455 
005055 
013467 
016136 




18* : 


ERROF 



•18.. R5 iINITIALIZE THE LOOP COUNTER. 

«100..R1 iSET 100 MS TIME OUT. 

•8IT1S.R2 jSELECT TX.ACTION BIT TO TEST. 

CSRA.R4 {PASS OUT CSR AS THE WORD TO TEST. 

4BIT1S.RS lUAIT FOR TX ACTION TO BE SET. 

PC.MSLOOP :WAIT UP TO 100 MS FOR TX.ACTION SET. 

20» ;IF TIME-OUT. CONSIDER TX.ACTION CLEAR. 

R3 ;N0U. WAIT FOR TX.ACTION CLEAR. 

PC.MSLOOP ;MAIT UP TO 100 MS FOR TX.ACTION CLEAR. 

16* jIF TIME-OUT. REPORT TX.ACTION WON'T CLEAR. 

R5 J DECREMENT THE TX.ACTION SET COUNTER. 

14* -.LOOP IF NOT TOO MANY TX.ACTIONS FOUND. 

ACTION SET REPEATEDLY AFTER RESET. NO DATA SENT." 

«eM2607.Rl s SELECT ERROR MESSAGE. 

18$ 5 GO TO REPORT THE ERROR. 

•EM2608.R1 -.SELECT TX ACTION STUCK SET MSG. 

2605.EM2606.ER0503: >>>>> ERROR #2605 <<<<<. 

TRAP CJERDF 
.UORO 2605 
.WORD EM2606 
.WORD ER0503 



6950 
6951 
6952 
6953 
6954 
6955 
6956 
6957 
6958 
6959 
6960 
6961 
6962 
6963 
6964 
6965 
6966 
6967 
6968 
6969 
6970 
6971 



6972 
6973 
6974 
6975 
6976 
6977 



035012 
035020 
035022 
035026 



032767 
001540 
004767 
000430 



000100 
166006 



145204 



J EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABL^^D 

sEXIT WITH TEST FAILURE MESSAGE IF 
:N0 EXTENDED ERROR REPORTING HAS BEEN REQUESTED 
•.ENABLE TX INTERRUPTS FOR THE FX.INT TE.TING. 
jGO TO TEST WITH TX.ACTION SET. 



BIT 
BEQ 
JSR 
BR 



•BIT06.0PTION 
34 » 

PC.TXIEI 
24* 



J ♦ 



VERIFY THAT NO INTERRUPTS OCCUR WITH TX.ACTION CLEAR. 



035030 


004767 


166000 


035034 


012704 


000062 


035040 


004767 


163060 


035044 


005767 


145256 


035050 


001417 




035052 


012701 


013526 


035056 


005767 


145246 


035062 


100002 




035064 


012701 


013673 


035070 






035070 


104455 




035072 


005056 




035074 


013467 




035076 


016136 




035100 


032767 


000100 


035106 


001500 





20»: JSR PC.TXIEI 

MOV «50.,R4 

JSR PC. DELAY 

TST TXINTC 

BEQ 24* 

MOV «EM2607.R1 

TST TXINTF 

BPL 22* 

MOV «EM2609.R1 
iREPORT "TRANSMIT INTERRUPT TEST ERROR: 

22 * : ERROF 2606 . EM2606 . ER050S : 



S ENABLE TX.INTERRUPTS. 
tPASS 50 MS TIME TO THE DELAY ROUTINE. 
DELAY 50 MILLI -SECONDS TO ALLOW INTS TO OCCUR. 
TEST THE TX INTERRUPT COUNT. 
SKIP THE ERROR IF NO TX INTERRUPTS. 
SELECT MESSAGE IN CASE TX INT FLAG CLEAR. 
TEST THE TX INTERRUPT FLAGS. 
GO REPORT ERROR IF TX FLAG IS CLEAR. 
iTX FLAG IS SET. SELECT PROPER ERROR MESSAGE. 

■>**•>•> ERROR *2606 <<<<<. 

TRAP C»EROF 
.WORD 2606 
.WORD EM2606 
.WORD ER0503 



: ♦ 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



145116 



BIT «6IT06. OPTION 
BEQ 32* 



;EXIT WITH TEST FAILURE MESSAGE IF 

iNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 
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HARDWARE TEST 



6978 
6979 
6980 
6981 
6982 
6985 
6984 
6985 
6986 
6987 
6988 
6989 
6990 
6991 
6992 
6993 
6994 
6995 
69^ 
699/ 
6998 
6999 
7000 
7001 
7002 
7003 
7004 
7005 
7006 
7007 
7008 
7009 
7010 
7011 
7012 
7013 
7014 
7015 
7016 
7017 
7018 
7019 
7020 
7021 
7022 
7023 
7024 
7025 
7026 
7027 
7028 
7029 
7030 
7031 



035110 
035114 



035120 
035124 
035130 
035134 
035140 



055144 
035150 
035152 

035156 
035164 
035166 
035170 
035174 



035176 
035202 



035206 
035212 



055214 
035220 
035224 
035226 
035232 



035254 
035240 
035242 



035246 
035246 
035250 
055252 



005067 
005067 



012705 
012700 
004767 
012700 
004767 



016701 
005002 
010177 

112777 
005201 
005202 
020227 
002766 



012704 
004767 



005767 
001010 



012701 
005777 
100410 
012701 
000405 



005767 
100012 
012701 



104455 
005057 
015467 



INTA 



145212 
145210 



177777 
000200 
166416 
156430 
166436 



145140 
145064 
000000 

000020 



000372 
162716 



145114 



013752 
145016 

014044 



145070 
013675 



<%Q 180 



! PREPARE TX INTERRUPT COUNTER AND FLAGS. 



24S: 



CLR 
CLR 



TXINTC 
TXINTF 



:CLEAR THE TX INTERRUPT COUNT. 
iCLEAR THE TX INTERRUPT FLAGS. 



I SET UP LINE PARAMETERS FOR TRANSMISSION. 

MOV «MAPLNS.R5 :PASS ACTIVE LINES BIT MAP. 

MOV #200. RO {PASS INERT STATE, INTERNAL LOOPBACK. 

JSR PC.WTWLNC J DISABLE RECPTION AND DMA. ETC. ON DUT . 

MOV <H56430.R0 jSPECIFY 9600BPS. ISTOP.NO PARITY .8BITS/CHAR. 

JSR PC.UTULPR :URITE TO ALL LPR REGISTERS. 

SEND A NULL CHAR TO EACH LINE. 



25*. 



145064 



MOV 
CLR 
MOV 

MOVB 
INC 
INC 
CMP 
BLT 



lESTAT.Rl 
R2 

R1.8CSRA 

«0.srOATA 

Rl 

R2 

R2.«NUMLNS 
25 » 



:SET UP THE STATE OF THE INTERRUPT ENABLE BITS, 
i CLEAR THE LINE COUNTER. 

SET UP THE LINE NUMBER AND INTERRUPT ENABLE 

BITS IN THE CSR. 

SEND A NULL CHARACTER TO THE OUTPUT FIFO. 
fJEXT CSR CONTENTS. 
NEXT LINE. 

IF ALL LINES HAVE NOT BEEN SERVICED THEN 
BRANCH. 



DELAY 250 MILLI -SECONDS TO ALLOW INTERRUPTS TO OCCUR. 



MOV 

JSR 



9250. .R4 
PC. DELAY 



;SET UP FOR 250 MS DELAY 
;WAIT 250 MS. 



VERIFY THAT TX INTERRUPTS OCCURRED. 



TST 
BNE 



TXINIC 
26 ( 



; CHECK THE TX INTERRUPT COUNTER. 

I SKIP THE FOLLOWING ERROR IF WE GOT TX INTS. 



26t: 



28«: 



DETERMINE THE REASON THAT WE RECEIVED NO INTERRUPTS. 

MOV ♦EM2610,R1 jSET UP MSG IN CASE "TX.ACTION IS SET'. 

TST aCSRA J CHECK THE OUT CSR. 

BMI 28» :G0 TO REPORT ERROR IF TX.ACTION IS SET. 

MOV 0EM2611.R1 iSET UP "TX.ACTION NOT SET" MESSAGE. 

BR 28t iGO AND REPORT THE ERROR. 

CHECK TO VERIFY THAT TX.ACTION WAS SET F(» EACH INTERRUPT. 

TST TXINTF jCHECK THE TX INTERRUPT FLAGS. 

BPL 30 > {SKIP ERROR IF TX.ACTION CLR FLAG IS CLEAR. 

MOV «£M2609.R1 jSET UP TX INT WITH "TX.ACTION CLR' MSG. 



, REPORT "TRANSMIT INTERRUPT TEST ERROR; 
ERROF 2607.EM2606.ER0503i 



> > > > > ERROR *2607 <<«<<. 

TRAP C«ERDF 
.WORD 2607 
.WORD EM2606 





035254 


016136 




7032 








7033 








7034 








7035 








7036 


035256 


032767 


000100 


7037 


035264 


001411 




7038 








7039 








7040 








7041 








7042 


035266 


016702 


145022 


7043 


035272 


001406 




7044 


035274 


012701 


007415 


7045 








7046 


035300 
035300 
035302 
035304 
035306 


104455 
005060 
013467 
016174 




7047 








7046 








7049 








7050 


035310 


005001 




7051 


035312 


004767 


165456 


7052 


035316 


004767 


164670 


7053 


035322 








035322 


012700 


000300 




035326 


104441 




7054 


035330 








035330 


016700 


144676 




035334 


104436 




7055 


035336 








035336 


016700 


144672 




035342 


104436 




7056 








7057 


035344 


005067 


144736 




033390 








035350 


012700 


000340 




035354 


104441 




7059 


035356 
035356 
035356 


104401 
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.WORD ER0503 



i EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



144740 



BIT OBIT06. OPTION 
BEQ 32* 



;EXIT WITH TEST FAILURE MESSAGE IF 

:N0 EXTENDED ERROR REPORTING HAS BEEN REQUESTED 



VERIFY THAT NO RX INTERRUPTS HAVE BEEN GENERATED SO FAR IN THIS TEST. 
30*: 



MOV 
BEQ 
MOV 



RXINTC.R2 
32* 

*EM0525.R1 



LOAD O OF RX INTERRUPTS FOR ER0504 RTN. 
SKIP ERROR IF NO RX INTERRUPTS. 
SET UP MESSAGE ADR FOR INDIRECT PRINT, 
{REPORT "RX INTERRUPTSCS) RECEIVED UITH RX INTERRUPTS DISABLED." 
ERRDF 2608.EM2606.ER0504i >>>>> ERROR #2608 <<<<< 

TRAP 
.WORD 
.WORD 
.tORO 



C*ERDF 
2608 
EM2606 
ER0504 



DISABLE INTERRUPTS AND CLEAN OUT THE INTERRUPT VECTORS USED IN THIS TEST, 
32*: 



34*; 



60*: 



CLR 
JSR 
JSR 

SETPRI 



CLRVEC 
CLRVEC 



CLR 
SETPRI 



ENOTST 



Rl 

PC.TXIEO 
PC.RXIEO 
«PRI06 



RXVECA 
TXVECA 



CTRLCF 
#PRI07 



CLEAR BOTH TRANSMITTER 
INTERRUPT ENABLE AND RECEIVER 
INTERRUPT ENABLE BITS IN THE DUT CSR. 
iDISABLE DEVICE INTERRUPTS. 

MOV #PKI06.R0 
TRAP C*SPRI 

iRETURN RX INT VECTOR TO UNUSED POOL. 

MOV RXVECA. RO 

TRAP C*CVEC 

;RETURN TX INT VECTOR TO UNUSED POOL. 

MOV TXVECA. RO 

TRAP C»CVEC 

! INDICATE THAT WE ARE NOT UITHIN A TEST, 
t DISABLE ALL INTERRUPTS. 

MOV #PRI07.R0 
TRAP C*SPRI 



L 10054: 



TRAP 



C*ETST 



7060 



FUNC TST P 



7062 
7063 
7064 
7065 
7066 
7067 
7068 
7069 
7070 
7071 
7072 
7075 
7074 

7075 



7076 
7077 
7078 
7079 
7080 
7081 
7082 
7083 
7084 
7085 
7086 
7087 
7088 
7089 
7090 
7091 
7092 
7093 
7094 
7095 
7096 
7097 
7096 
7099 
7100 
7101 



7102 



7103 
7104 
7105 
7106 
7107 



035360 
035360 
035360 
035360 
035364 

035366 
035374 
035402 
035410 
035416 
035424 



035430 
035434 
035436 
035442 



035450 
035454 



035460 
035460 
035464 
035466 
035466 
035472 
035476 
035502- 
035506 
035510 



012700 
104441 
000030 
012767 
012767 
012767 
012767 
012767 
005067 



004767 
103402 
000167 
012767 



012705 
004767 



012700 
104441 

012746 
012746 
016746 
012746 
104437 
062706 



EVA 
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000240 



000030 
177777 
000001 
005671 
014223 
145032 



163722 

000644 
005673 



177777 
165220 



000340 



000340 
024146 
144532 
000003 

000010 



144730 
144704 
146356 
146352 
146346 



.SBTTL HARDWARE TEST - BRLEVA 

• * * ******************************************** *********** ***«******«*4i***4i4i*« 



;* 

!* 

:* 
;* 
:* 



BR LEVEL TEST B 

THIS TEST VERIKIES THAT THE DEVICE UNDER TEST (OUT) WILL GENERATE 
RECEPTION AND TRANSMISSION INTERRUPTS AT THE CORRECT bR LEVEL. 
THIS TEST DOES NOT DEPEND ON THE USE OF THE SERIAL LINE TRANSMISSION 
OR RECEPTION CAPABILITIES OF THE OUT. THE LINES ARE PUT IN INTERNAL 
L00P8ACK TO MINIMIZE ANY EXTERNAL EFFECTS THAT COULD BE CAUSED ON 
DEVICES ATTACHED TO THE SERIAL LINES. 

********************************************* 



BGNTST 
SETPRI 



TNUM 

MOV 

MOV 

MOV 

MOV 

MOV 

CLR 



*PRI05 



• TNUM ♦ 1 
♦TNUM.TSTNUM 
#-l,CTRLCF 
♦l.ERRTYP 
«3001. .ERRNBR 
♦EM3001.ERRMSG 
ERSMRF 



T24 ■ ■ 

;ALLOU LTC INTERRUPTS. 

MOV 0PRI05.R0 
TRAP OSPRI 

INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

SET UP THE TEST NUMBER, (30) 

INDICATE THAT UE ARE IN A TEST. 

SET ERROR TYPE AS FATAL IN ERROR TABLE. 

SET THE FIRST ERROR NUMBER IN ERROR TABLE. 

SET ERROR MESSAGE ADDRESS IN ERRTBL. 

INITIALIZE THE "REPORT ERROR SUMMARY" FLAGS. 



RESET THE OUT TO A KNOWN STATE, DO NOT REMOVE THE STATUS COOES FROM THE FIFO. 

CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERRORS FROM >>>>> 3001 THRU 3002 <<<<<. 



146320 2$: 



JSR PC.RESETT 

BCS 2$ 

JMP 60» 

MOV «3003. .ERRNBR 



RESET THE OHU-11. REPORT ANY ERRORS F(XJND. 
SKIP AROUND ABORTING TEST IF NO ERROR FOUND. 
ABORT TEST IF FATAL ERROR FOUND DURING RESET. 
SET THE ERROR REPORT NUMBER TO 3003. 



ENABLE TRANSMITTERS ON ALL LINES. 

4«: MOV «MAPLNS.RS sPASS ACTIVE LINE BIT MAP. 

JSR PC.TXENBL ; ENABLE TRANSMISSION ON ALL LINES. 

TgENERATE A TRANSMISSION INTERRUPT REQUEST. 

: PROCESSOR PRIORITY SHOULD BE AT 7 DISABLING INTS. 

SETPRI <«>RI07 : DISABLE ALL INTERRUPTS. 

MOV «PRI07.R0 

TRAP CISPRI 

SETVEC TXVECA.«TXINTR,«PRI07 jSET UP INTERRUPT VECTOR TO CATCH TX INT. 

MOV «>RI07..(SP) 

MOV *TXINTR..(SP) 

MOV TXVECA.-(SP) 

MOV «3.-(SP) 

TRAP C<SVEC 

ADO «10.SP 



i ♦ 



SET UP OUT FOR TRANSMISSION INTERRUPTS: 
SET UP INTERNAL LOOPBACK. 
SET UP LINE PARAMETERS FOR TRANSMISSION. 
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'^EO 185 



/1O0 




012/05 


1 y yy 7 f 

\ 1 1 1 1 1 


7109 


A we ^A 

055520 


A • ^7AA 

012/00 


AAA^AA 

0OO2OO 


7110 


A sec 

055524 


AAA ^ 

004767 


166022 


^ • • • 

7111 


A VKK. VA 

055550 


A ■ AA 

0127OO 


4 A >A 

156430 


71 12 


055554 


AAA 7^ 7 


1660*2 


711S 








711* 








7115 








7116 


055540 


At A 7 A 4 

016701 




7117 


055544 


A fl A t 7 7 


t AAA 73 

1444 n 


71 15 










055530 


1 1 3 77 7 




7120 


055556 


005201 




7121 


035560 


A ^A * ^ 7 




'lee 


055564 


rtA3 7<l7 
UVc 'O ' 




' 1 J9 








7 1 5A 








71 3K 

'led 














000062 


7127 


055572 


004767 


162526 


7128 






7129 








7150 








7151 


055576 







7152 
7155 
7154 
7155 
7156 
7157 
7158 
7159 
7140 
7141 
7142 
7145 
7144 
7145 
7146 
7147 
7148 
7149 
7150 
7151 



7152 
7155 
7154 
7155 
7156 



055576 
055602 
055606 
055612 
055616 
055620 



055624 
055650 
055652 



055654 
055640 



055644 

055650 
055654 
025660 
055664 
055664 
055666 
055670 
055674 



012746 
012746 
016746 
012746 
104457 
062706 



012705 
005005 
005002 



004767 
004767 



005067 
005067 
005067 
005067 

010500 
104441 
012704 
004 767 



000540 
025756 
144420 
000005 

000010 



000540 



164412 

165170 



144456 
144454 
144454 
144452 



000001 
162224 



MOV ♦MAPLNS.RS I PASS ACTIVE LINES BIT MASK. 

MOW «200.R0 I PASS INERT STATE. INTERNAL LOOPBACK . 

JSR PC.UTULNC I DISABLE RECPTION AND DMA. ETC. ON DUT , 

MOV #156450, RO iSPECIFY 9600BPS. ISTQP.NO PARITY.8BITS/CMAR, 

JSR PC.UTULPR iURITE INTO ALL LPR REGISTERS. 

SEND A NULL CHAR TO EACH LINE. 



5»! 



MOV 
MOV 



lESTAT.Rl 
R1.8CSRA 



144472 



I SET UP THE STATE OF THE INTERRUPT ENABLE BITS. 
tSET UP THE LINE NUMBER AND INTERRUPT ENABLE 
iBITS IN THE CSR. 

I SEND A NULL CHARACTER TO THE OUTPUT 
(NEXT LINE. 

I IF ALL LINES HAVE NOT BEEN SERVICED THEN 
I BRANCH. 



FIFO. 



I PASS 50 MS TIME TO THE DELAY ROUTINE. 
iDELAV 50 MILL I -SECONDS. 



MOVB •O.SFOATA 
INC Rl 
CMP R1.«NUMLNS 
BLT 5» 

IdELAY 50 MS TO ALLOW TIME FOR THE INTERRUPT TO BE GENERATED. 

' MOV #50. ,R4 
JSR PC, DELAY 

TgENERATE A RECEPTION INTERRUPT REQUEST. 

* SETVEC RXVECA.#RXBRRT,«PRI07 iSET UP INTERRUPT VECTOR TO CATCH Rx INT. 

riOV 4PRI07.-(SP) 

MOV •RXBRRT, CSP^ 

MOV RxvECA. (SP) 

MOV #5. (SP) 

TRAP CISVEC 

ADO «10,SP 



I 
i 

t - 



SET UP FOR THE LOOP WHICH TESTS THE INTERRUPT BR LEVELS. 



I SET UP THE PRIORITY LEVEl TO 7. 
iCLEAR THE RX PRIORITY STORE AND FLAGS. 
iCLEAR THE TX PRIORITY STORE AND FLAGS. 



t 
t 

I - 
61 



MOV #540. R5 

CLR R5 
CLR 92 

I'^ENABLE TX AND RX INTERRUPTS. 
» PROCESSOR PRIORITY SHOULD BE AT 

' JSR PC.RXIEl lENABLE RECEIVER INTERRUPTS. 

JSR PCTXIEI I ENABLE TRANSMITTER INTERRUPTS. 

LOOP. LOWERING THE PROCESSOR PRIORITY UNTIL THE DUT INTERRUPTS ON RX AND Tx. 



7 DISABLING THE INTERRUPTS. 



ClR 
CLR 
CLR 
CLR 
SETPRI 



MOV 
JSR 



TxINTC 
TXINTF 
RXINTC 
RXiNTr 

R5 



#1.R4 

PC, DELAY 



iCLEAR THE TX INTERRUPT COUNTER. 

iCLEAR THE TX INTERRUPT FLAGS. 

I CLEAR THE RX INTERRUPT COUNTER. 

iCLEAR THE RX INTERRUPT FLAGS. 

iSET PROCESSOR PRIORITY TO THE SELECTED VALlC. 

NOV R5.R0 
TRAP CISPRI 

iPASS I HS COUNT TO THE DELAY ROUTINE. 

iDELAy 1 MS TO ALLOW INTERRUPTS TO OCCL«. 



! DETERMINE IF ANY RX OUT INTERRUPTS OCCURRED. 

I LOG THE PROCESSOR PRIORITY FOR THE RX INTERRUPT ir FIRS' RX INT, 
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'157 








7158 


035700 


005767 


144410 


7159 


035704 


001412 




7160 








7161 








7162 








7165 


035706 


005705 




7164 


055710 


001010 




7165 


035712 


010505 




7166 


055714 


052705 


100000 


7167 


055720 


016700 


144572 


7168 
7169 


055724 


042700 


157777 


05S730 


050005 




7170 








7171 

71 ;2 














71'5 








7174 


055732 


005767 


144570 


7175 


055756 


001405 




7176 








7177 








7178 








7179 


055740 


005702 




7180 


055742 


100403 




7181 


055744 


010502 




7182 


055746 


052702 


100000 


7183 








7184 








7185 








7186 








7187 


035752 


162705 


000040 


7186 


035756 


002402 




7189 


035760 


050205 




7190 


055762 


100550 




7191 








7192 








7193 








7194 


055764 








035764 


012700 


000540 




055770 


104441 




7195 


035772 








055772 


016700 


144234 




035776 


104456 




7196 


056000 








056000 


016700 


144230 




036004 


104436 





7197 
7198 
7199 
7200 
7201 
7202 
7203 
7204 
7205 
7206 
7207 



056006 
056010 



005702 
100420 



jCMECK THE RECEIVE INTERRUPT COtJNTER. 

(SKIP THE PRIORITY LOG IF NO Rx INT OCOJPREO. 



rHE PRIORITY, 



TST RXINTC 

BEQ 8» 

t'lf THIS IS THE riRST R< INTERRUPT, LOG 

*TST R5 jCHECK the RX PRIORITY STORE AND FLAGS. 

BNE 8» iGOTO TEST FOR TX INTS IF NOT THE FIRST RX INT. 

MOV R5.R3 jlOG THE PRESENT PRIORITY IN THE Rx PRIG STORE. 

BIS <»BIT15.R3 I SET THE RX INT HAS OCCURRED FLAG. 

MOV RXINTF.RO jGET THE RX INTERRl^T ROUTINE FLAGS. 

BIC •137777, RO iCLEAR ALL BUT THE TX INT ERROR FLAG. 

BIS R0.R3 I IF TX INT ERROR. SET BIT 14 OF THE PRIO FLAGS. 



I • 



I DETERMINE IF ANY TX OUT INTERRUPTS HAVE OCCURRED. 
I LOG THE PRESENT PROCESSOR PRIORITY IF THIS IS THE FIRST TX INTERRUPT, 



8ti 



J CHECK THE TRANSMIT INTERRUPT COUNTER. 

(SKIP THE PRIORITY LOG IF NO TX INT OCCURRED. 



TST TXINTC 

BEQ 10* 

I IF THIG IS THE FIRST TX INTERRUPT. LOG THE PRIORITY. 

'tST R2 jCHECK THE TX PRIORITY STORE AND FLAGS. 

BMI 10 » ;SKIP THE LOGGING IF NOT FIRST Tx INTERRUPT. 

MOV R5.R2 jLOG THE PRESENT PRIORITY IN THE TX PRIO STORE, 

BIS •eiTl5.R2 :SET THE TX INT MAS OCCURRED FLAG. 



i ♦ 



I SELECT NEXT PROCESSOR PRIORITY. 
: TEST FOR BOTH RX AND TX INTERRUPTS HAVING OCCURRED. LOOP IF NOT, 



lot! 



sue 

BLT 

BIT 
BPL 



«40,R5 

12 » 

R2.R5 

6t 



iDECREMENT PRIORITY LEVEL By ONE. 
jGOTO CHECK FOR ERRORS IF BELOU PRIORITY ZERO. 
lANO PRIO FLAGS TOGETHER. ALTER NONE OF THEM. 
:LOOP IF RX AND TX INTS HAVEN'T BOTH OCCURRED. 



DISABLE INTERRUPTS AND CLEAR INTERRUPT VECTORS. 
12»: SETPRI •PRI07 jDISAOLE ALL INTERRUPTS. 



CLRVEC RXVECA 
CLRVEC TXVECA 



MOV 
TRAP 

:RETURN RX INT VECTOR TO UNUSED POOL. 

MOV 
TRAP 

(RETURN TX INT VECTOR TO UNUSED POOL. 

MOV 
TRAP 



•PRI07,RC 
C»SPRI 

RXVECA. RO 
CtCvEC 

TXVECA.RO 
C*CVEC 



; VERIFY THAT RX AND TX INTERRUPTS OCCURRED, 
I AT THE PROPER BR LEVEL. AND 
t IN THE PROPER ORDER. 

J DETERMINE IF TX INTERRUPT OCCURRED. 



TST 
BMI 



R2 
16* 



jOETERMlNE WHETHER TX INT OCCURRED OR NOT. 
(SKIP THESE ERRORS IF TX INT OCCURRED. 



s DETERMINE REASON THAT NO TX INT OCCURRED. 



Di5 
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t209 
7209 
72\0 
7211 
7212 
7213 



7214 
"215 
7216 
7217 
7218 
7219 
7220 
7221 
7222 
7223 
7224 
7225 
7226 
7227 
7228 
7229 
7230 
7231 
7232 
7233 
7234 
7235 
7236 
7237 
7238 



7239 
7240 
7241 
7242 
7243 
7244 
7245 
7246 
7247 
7248 
7249 
7250 
7251 
7252 
7253 
7254 
7255 
7256 



036012 
0360 16 
036022 
036024 

036030 
056030 
036032 
036034 
036036 



036040 
036046 



1701 015752 

i777 144220 
100402 

012701 014044 



104455 

005673 
014223 
016136 



032767 000100 144156 
001513 



14*: 



MOV OEMaeiO.Rl 
TST aCSRA 
BMI 14 1 

MOV •eM26ll.Rl 

jREPORT INTERRUPT BR LEVEl 



ERROr 3003.EH5001.ER0503t 



jSELECT "NO TX INT FROM rx. ACTION" MESSAGE. 
iCHECK THE TX. ACTION BIT OF THE OUT C5R. 
jSKIP TX. ACTION CLR MSG SELECTION IF IT IS SET. 
iSELECT "TX. ACTION CLEAR AFTER CHARS SENT" MSG. 
TEST ERROR:" 



ERROR «3003 <<<<'. 

TRAP C lEROF 
.WORD 3003 
.WORD EM5001 
. UORO ER0503 



EXIT THE TEST IF EXTENDED ERROT REPORTING HAS NOT BEEN ENABLED 



056050 000427 



036C52 010204 

036054 042704 177400 

056060 006204 

056062 006204 

036064 006204 

056066 006204 

056070 006204 

056072 005204 

056074 116705 144140 

056100 120405 

056102 001412 

056104 012701 014356 
056110 

056110 104455 

056112 005674 

056114 014223 

036II6 016620 



056120 052767 OOOlOO 144076 
056126 001463 



056150 005705 
056132 100421 



056154 012701 014127 

056140 052777 000200 144074 

036146 001002 

0S6150 012701 014262 



BIT «eiT06. OPTION 
BEQ 261 

BR 18i 



jEXiT WITH TEST FAILURE MESSAGE IF 

iHO EXTENDED ERR09 REPORTING HAS BEEN REQUESTED 

I SKIP THE BR LEVEL CHECK. NO TX INT OCCURRED. 



161 



: VERIFY THAT THE TX INTERRUPT WAS AT THE PROPER BR LEVEL. 

MOV R2.P4 J CALCULATE THE BR LEVEL 

BIC #17 7400. R4 i THAT THE TRANMSIT 

ASR R4 : INTERRUPT UAS 

ASR R4 : REQUESTED AT. WHICH 

ASR R4 : IS ONE GREATER THAN 

ASR fi4 ; THE PROCESSOR PRIORITY 

ASR R4 J LEVEL AT WHICH THE 

INC R4 I TRANSMIT INTERRUPT OCCURRED. 

MOVB BRLEVL,R5 jGET THE EXPECTED INTERRUPT BP LEVEL. 

CMPB R4.R5 iCOMPARE THE INTERRUPT BR LEVEL WITH EXPECTED. 

BEQ 181 I SKIP THE ERROR IF BR LEVEL IS CORRECT. 

;REPORT "TX INTERRUPT GENERATED AT WRONG BR LEVEL: 

MOV «EM5005.R1 i SELECT THE ERROR MESSAGE FOR THE ERROR CALL. 

ERROF 3004.En3001.ER3001t >>>>> ERROR »50O4 <<<<<. 

TRAP C»ERDF 
.WORD '004 
.WORD EM3001 
.WORD ERSOOl 

EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



t ♦ 



t - 



BIT «6IT06. OPTION 
BEQ 26 t 



iEXiT WITH TEST FAILURE MESSAGE IF 

iNO EXTENDED ERROR REPORTING HAS BEEN REQUESTED 



I DETERMINE IF RX INTERRUPT OCCURRED. 



I8»: 



TST 
BMI 



R3 
22* 



jCMECK THE RX INT OCCURRED FLAG. 

J SKIP THESE ERRORS IF RX INT OCCURRED. 



l oETERMINE REASO^^ THAT NO RX INT OCCURRED. 

* MOV •EM2612.R1 jSELECT "NO RX INT FROM RX. DATA. AVAIL' MSG. 

BIT «BIT7.aCSRA iCHECK THE RX. DATA. AVAIL BIT OF THE OUT CSR. 

BNE 20* tSKIP RX. DATA. AVAIL ClR MSG IF BIT IS SET. 

MOV «EM3002.R1 tSElECT "NO RX. DATA. AVAIL AFTER RESET MSG. 



Eib 



BRLEVA 
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V57 
7^56 



7259 
7260 
7261 
7262 
7263 
7264 
7265 
7266 
7267 
7268 
7269 
7270 
7271 
7272 
7275 
7274 
7275 
7276 
7277 
7278 
7279 
7280 
7281 
7282 



7283 
7284 
7285 
7286 
7287 
7288 
7289 
7290 
7291 
7292 
7295 
7294 
7295 
7296 



056154 
036154 
036156 
036160 
036162 



056164 
056172 



104455 
005675 
014223 
016156 



052767 000100 
001441 



jREPORT "INTERRUPT BR LEVEL TEST ERROR: 
20$: ERRDF SOOS.EMSOOl.ERO*^ -'3j 



I ♦ 



>>>>> ERROR #3005 <<<<<. 

TRAP C«EROF 
. UORO 3005 
.UORD EH3001 
.WORD ER0503 



144032 



t EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 

' BIT ♦eiT06. OPTION ;EX1T WITH TEST FAILURE MESSAGE If 

BEG 26$ ;N0 EXTENDED ERROR REPORTING HAS BEEN REQUESTED 



036174 000427 



036176 010304 

056200 042704 177400 

056204 006204 

056206 006204 

056210 006204 

056212 006204 

056214 006204 

056216 005204 

056220 116705 144014 

056224 120405 

056226 001412 

056230 012701 014452 
056254 

056234 104455 

036256 005676 

056240 014225 

036242 016620 



036244 032767 000100 
056252 001411 



BR 



24$ 



;SKIP THE BR CHECK IF NO RX INT OCCURRED. 



t VERIFY THAT THE RX INTERRUPT UAS AT THE PROt'ER BR LEVEL, 



22* : 



7297 
7298 
7299 
7300 
7301 



MOV 
BIC 
ASR 
ASR 
ASR 
ASR 
ASR 
INC 
MOVB 
CMPB 
BEQ 
s REPORT "RX 

nov 

ERRDF 



i ♦ 



R3.R4 

«1 77400. R4 

R4 

R4 

R4 

R4 

R4 

R4 

BRLEVL.R5 
R4.R5 



CALCULATE THE 8R '.EVEL 
THAT THE RECEIVE 
INTERRUPT WAS 
REQUESTED AT. WHICH 
IS ONE GREATER THAN 
THE PROCESSOR PRIORITY 
LEVEL AT WHICH THE 
RECEIVE INTERRUPT OCCURRED. 
GET THE EXPECTED INTERRUPT BR 
COMARE THE INTERRUPT BR LEVEL WITH EXPECTED. 
SKIP THE ERROR IF BR LEVEL lb CORRECT. 



LEVEL. 



24$ 

INTERRUPT GENERATED AT URONG BR LEVEL 
•EM5004.R1 J SELECT ERROR MESSAGE 

3006.EM5001.ER5001; >>>>> 



FOR THE ERROR CALL. 

ERROR «3006 <<<<<. 

TRAP C$ER0F 
.UORO 5006 
.WORD EMSOOl 
.UORD ER5001 



145752 



I EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 

* BIT «BIT06. OPTION lEXIT MITH TEST FAILURE MESSAGE IF 

BEQ 26$ >N0 EXTENDED ERROR REPORTING HAS BEEN REQUESTED 



056254 032703 040000 

056260 001406 

056262 012701 014506 
056266 

056266 104455 

056270 005677 

056272 014223 

056274 016156 



056276 004767 164472 
056302 004767 163704 



24$ 



» TEST FOR INTERRUPTS OCCURING 

' •6IT14,R3 
26$ 

INTERRUPT GIVEN 
<^EM3005.R1 



BIT 
BEQ 
I REPORT "TX 
MOV 
ERRDF 



3007 . EMSOOl .ER0503 I 



IN THE PROPER ORDER. 



J CHECK THE IMPROPER INT ORDER ERROR FLAG. 
J SKIP ERROR REPORT IF ERROR DID NOT OCCUR. 
PRECEDENCE OVER SIMULTANEOUS RX INT.- 
iSELECT THE ERROR MESSAGE FOR INDIRECT PRINT. 



> > > > > ERROR 



♦3007 

TRAP 
.WORD 
.WORD 
.WORD 



C$ERDF 
300' 
EM3001 
ER05O5 



CLEAN UP, EXIT THE TEST. 



26$: 



JSR 
JSR 



PC.TXIEO 
PC.RXIEO 



iCLEAR TRANSMITTER INTERRUPTS. 
I CI EAR RECEIVER INTERRUPTS. 



F 15 
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HARDWARE TEST - 8RLEVA 

7502 056306 005067 X45774 
7505 056512 

056512 012700 000540 

056516 104441 
7504 056520 

056520 

056520 104401 

7505 



60>: 



' '"RI 
ENOTST 



CTRLCF 
0PRI07 



J INDICATE THAT UE ARE NOT UITMIN A TEST, 
{DISABLE ALL INTERRUPTS. 

MOV •PRI07.ro 
TRAP C»SPRI 



L 10055: 



TRAP 



C»ETST 



CZOHUBO OHU 11 fKJNC TSr PARTI MACRO m200 IS-HAR 64 09:15 



HARDWARE TEST 



7507 
7308 
7S09 
7510 
7511 
7512 
7515 
7514 
7515 



OIABHP 



Gi5 

PAGE 124 



^tQ 198 



7516 



7517 
7518 
7519 
7520 
7521 
7322 
7323 
7324 
7325 
7326 
7327 
7328 
7329 
7550 
7551 
7552 
7533 
7354 
7555 
7556 
7557 
7558 
7559 
7540 
7341 
7342 
7345 
7344 
7545 
7546 
7547 
7548 
7549 
7550 
7351 
7352 
7355 
7554 
7355 
7356 
7557 
7558 
7359 
7360 



056522 
056522 
056522 
056522 
056526 

056530 
056556 
056544 
056552 
056560 
056566 



056374 
056400 



056402 
036406 
036410 
036414 
056416 
056420 



036422 
036450 
056452 



056440 
056444 
056450 
056454 



012700 
104441 

000051 
012767 
012767 
012767 
012767 
012767 
012767 



004767 
105103 



016705 
005004 
016703 
000241 
006005 
105070 



012767 
010415 
052777 



012701 
016702 
004767 
103042 



SBTTL HARDWARE TEST 



OIABMP 



- DIAGNOSTIC FIELD CBMP) TEST 
THIS TEST VERIFIES THAT A REQUEST TO THE DUT TO REPORT BMP STATUS 
CODES IS COMPLIED WITH, WITHIN THE SPECIFIED TIME. 
ALL ACTIVE LINES ARE TESTED. 



000240 



000051 
177777 
000001 
006055 
014600 
017222 



161402 



145766 
145742 
145414 
145410 
145404 
145400 



BGNTST 
SETPRI 



TNUM 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 



•PRI05 



• TNUM ♦ 1 
♦TNUM.TSTNUM 
♦-1.CTRLCF 
♦l.ERRTYP 
O3101. .ERRNBR 
♦EM3101.ERRMSG 
0ER9101,ERRBLK 



T25: : 

SALLOW LTC INTERRUPTS. 

MOV «PRI05.R0 
TRAP CtSPRI 

; INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

I SET UP THE TEST NUMBER. (51) 

; INDICATE THAT WE ARE IN A TFST. 

jSET ERROR TYPE AS FATAL IN ERROR TABLE. 

J SET THE FIRST ERROR NUMBER IN ERROR TABLE. 

:SET ERROR MESSAGE ADDRESS IN ERRTBL . 

: SELECT THE CORRECT ERROR REPORTING ROUTINE. 



RESET THE DUT TO A KNOWN STATE. REMOVE THE STATUS CODES FROM THE FIFO. 

CLEAR TX AND RX INTERRUPT ENABLE BITS IN THE CSR. 
THIS SUBROUTINE REPORTS ERROR >>>>> 3101 <<<<<. 



JSR 
BCC 



PC.CLNRST 
60 < 



{RESET THE DHU-11. REPORT ANY ERRORS FOUND. 
sRESET FAILURE?. ABORT THIS TEST. 



145622 
145626 



2t; 



TEST ALL ACTIVE LINES INDIVIDUALLY. 

WRITE THE REQUEST CODE TO THE DIAGNOSTIC FIELD IN THE LPR REGISTER. 
VERIFY THAT A BMP CODE IS RETURNED WITHIN THE CORRECT TIME. 

MOV ACTLNS.R5 tGET THE ACTIVE LINE BIT MAP. 

CLR R4 ! CLEAR THE LINE Nt*«ER COUNTER. 

MOV CSRA.R5 ;GET THE AOORFSS OF THE OUT'S CSR. 

CLC jCLEAR THE CARRY BIT PRIOR TO SHIFTING BIT MAP. 

ROR R5 ;SHIFT THE BIT MAP INTO THE CARRY BIT. 

BCC 8$ ;00 NOT TEST THE LINE IF IT IS INACTIVE. 



SELECT THE LINE UNDER TEST. 
WRITE THE BMP REQUEST CODE TO THE DIAG FIELD IN THE LPR REGISTER. 



006056 
000002 



011750 
145576 
164540 



145540 
145606 



t - 



MOV «5102. .ERRNBR 
MOV R4,(R3) 
BIS •2.aLPRA 



.•SET THE ERROR NUMBER TO 3102. 

i SELECT THE LINE CURRENTLY UNDER TEST. 

i WRITE THE BMP REQUEST CODE TO THE LPR. 



WAIT FOR BMP REQUEST CODE TO BE CLEARED. REPORT ERROR IF TIME-OUT 
OCCURS. 



MOV 
MOV 
jSR 
BCC 



♦11750. Rl 
LPRA.R2 
PC.WAI6IC 
61 



I TEST BIT 1. TIMEOUT OF 1 SEC. 

,PASS THE ADDRESS OF THE REGISTER TO TES^. 

I WAIT FOR REQUEST CODE TO CLEAR. 

:G0 REPORT ERROR IF CODE DID NOT CLEAR IN TIME, 



WAIT FOR BMP CODE TO APPEAR IN THE FIFO. REPORT ERROR IF TIME OLT 
OCCURS- 



7561 
7362 
7563 
7364 
7565 
7566 
7567 
7566 
7569 
7570 
7571 
7572 
7575 
7574 
7575 
7576 
7577 
7578 
7579 
7580 
7581 
7582 
7585 
7584 
7585 
7586 
7387 
7388 
7389 
7590 
7591 
7592 
7393 
7594 

7595 
7596 
7597 
7598 
7599 
7400 
7401 
7402 
7405 
7404 
7405 
7406 
7407 
7408 
7409 



056456 
056462 
056466 
056472 
036476 



036500 
036504 
056510 
056512 
056516 
056522 
036524 
036526 
036552 
056554 
056556 
056542 
056544 
056546 
036552 
056554 
056560 

056562 
056564 

056570 
056570 



056572 
056600 



056602 
056604 
056606 
036610 
056614 
056614 
036614 



005267 
012701 
016702 
004767 
103031 



005267 
017702 
100024 
005267 
012700 
040200 
001016 
005267 
010200 
000500 
042700 
120400 
001006 
120227 
001415 
004767 
000410 

010401 
012702 



104460 



052767 
001405 



005204 
005705 
001502 
005067 



104401 



145306 
070012 
145550 
164572 
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IHC EmUBR I SET ERROR NUMBER TO 3105. 

MOV *70012,R1 sTEST BIT 7. TIMEOUT OF 10 MILLI SECS. 

MOV CSRA.R2 jPASS THE ADDRESS OF THE REGISTER TO TEST. 

JSR PC.UAIBIS iUAIT FOR RX.DATA.AVAILABLE TO SET. 

see 6( (GO REPORT ERROR IF CODE 010 »40T CLEAR IN TIME. 

READ THE BMP CODE (IF IT IS THERE) FROM THE R8UF REGISTER. 
DETERMINE IF IT IS A VALID BMP CODE. 

VERIFY THE BMP CODE WAS RECEIVED FROM THE CORRECT CHANNEL. 

IF THE Bri> CODE DOES NOT INDICATE OUT RUNNING OK. THEN SAVE IT ON 

THE QUEUE TO BE REPORfED IN A LATER TEST. 



145264 
145534 

145252 
170501 



145256 

177760 

000505 
165516 

014643 



6*. 



INC 


ERRNBR 


;SET ERROR NUMBER TO 3104. 


MOV 


SRBUFA,R2 


J GET THE BMP CODE FROM THE FIFO. 


QDI 


o» 


;uU KCKUK 1 tKKUK ir NU OnK LUUC r \J^JP^J , 


XNL 


CDDkJDD 
tHKNDH 




nuv 


91 'USUI (KU 


. CC T IC A QMD PAAC MACl/ 


BTC 


R? RO 


• TRY TO CLEAR THE BMP MASK 


BNE 


6t 


jGO REPORT ERROR IF IT IS NOT A VALID BMP CODE. 


INC 


ERRNBR 


;SET THE ERROR NUMBER TO 3106. 


MOV 


R2.R0 


;C0PY THE BMP CODE. 


SWAB 


RO 


:PUT THE LINE NUMBER IN THE LOU BYTE. 


BIC 


•177 760. RO 


i CLEAR THE UNWANTED BITS. 


CMPB 


R4.R0 


{DID THE BMP CODE COME FROM THE CORRECT LINE?. 


BNE 


6» 


;NOs GO REPORT ERROR. 


CMPB 


R2 . »505 


:IS THE BMP CODE A "GOOD ONE"?. 


BEQ 


8« 


lYES; SKIP SAVING THE BMP CODE ON THE QUEUE, 


JSR 


PC.SAVBMP 


J SAVE THE BMP CODE ON THE QUEUE. 


BR 


8$ 


iGO SEE IF THERE ARE ANY MORE LINE TO TEST. 


MOV 


R4.R1 


jPASS THE LINE NUMBER TO BE REPORTED. 


MOV 


•eM5l02.R2 


sPASS THE ERROR MESSAGE TO BE REPORTED. 






("BMP REQUEST BIT BAD ON LINE:" 


ERROR 




; > > > > > ERROR <<<<<. 



000100 143424 



TRAP 



EXIT THE TEST IF EXTENDED ERROR REPORTING HAS NOT BEEN ENABLED 



CSERROR 



BIT #BIT06, OPTION 
BEQ 60S 



;EXIT WITH TEST FAILURE MCSSAGE IF 

;N0 EXTENDED ERROR REPORTING HAS BEEN REQUESTED 



VERIFY ALL ACTIVE LINES HAVE BEEN TESTED. 



143472 



8$; 



60* ! 



INC 

TST 
BNE 

CLR 
END TST 



R4 

R5 
2i 

CTRLCF 



INCREMENT THE LINE NUMBER COUNTER. 
ARE THERE ANY MORE ACTIVE LINES TO TEST?. 
YES J BRANCH TO TEST THE NEXT LINE. 
INDICATE THAT WE ARE NOT WITHIN A TEST. 



L 10056: 



TRAP 



C»ErsT 



115 
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««0 190 



7411 








7412 








7413 








7414 








7415 








7416 








7417 








7416 








7419 








7420 








7421 








7422 


036616 
036616 






7423 




000032 




7424 


036616 


012767 


000032 


7425 


036624 


012767 


177777 


7426 


036632 


016702 


143666 


7427 


036636 


012703 


002526 


7428 


036642 


020203 




7429 


036644 


001411 




7430 








7431 








7432 








7433 








7434 








7435 


036646 


012701 


015433 


M36 


036652 
036652 
036654 
036656 
036660 


104455 
022125 
015257 
017262 




7437 








7438 


036662 


012767 


002526 


7439 








7440 


036670 


005067 


143412 


7441 


036674 
036674 
036674 


104401 





.SBTTL HARDWARE TEST 



- REPBMP 



;♦ 
t* 



REPORT ANY BMP COOES IN THE QUE'JE 
THIS IS A PSEUDO-TEST USED TO REPORT ANY BMP CODES THAT WERE TOUND 
IN THE OUT'S riPO DURING PREVIOUS TEST. AND LOGGED IN THE BMP CODE 
QUEUE. 

IT IS UNLIKELY THAT RUNNING THIS PSEUOO TEST ALONE WILL PRODUCE ANr 
ERROR REPORTS. 



14350O 
143454 



BGNTST 

TNUM • 
MOV 
MOV 
MOV 
MOV 
CMP 
BEQ 



• TNUM » 1 
4TNUM.TSTNUM 
4-l.CTRLCF 
BMPCQP.R2 
<«MPCQB.R3 
R2.R3 
60* 



T26: : 

I INCREMENT THE ASSEMBLY TIME TEST COUNTER. 

;SET UP THE TEST NUMBER. (93) 

! INDICATE THAT WE ARE IN A TEST. 

}GET THE CONTENTS OF THE POINTER. 

tGET THE START ADDRESS OF THE QUEUE. 

sSEE IF THE POINTER HAS MOVED FROM THE BASE, 

;EXIT NO CODES IN THE QUEUE. 



} THERE IS AT LEAST ONE BMP CODE IN THE QUEUE. REPORT THE ERROR. 

;REPORT ERROR BMP CODE FOUND IN TEST NN. BMP COOE:NNNNNN" 

MOV •EM9304,R1 ;PASS THE FIRST MESSAGE TO BE REORTED. 

ERRDF 9301.EM9301.ER9301 ; >>>>> ERROR «9301 <<<<< 

TRAP 
.WORD 
.WORD 
.WORD 



CJERDF 
9301 
EM9301 
ER9301 



143634 



MOV «BMPCaB.BMPCQP :SET POINTER BACK TO THE BEGINING OF THE QUE. 

; INDICATE THAT WE ARE NOT WITHIN A TEST. 

L 10057: 



60$: CLR CTRLCF 

ENDTST 



TRAP 



CJETST 



Ji5 
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<;£0 191 



7450 
7451 
7452 
7453 
7454 
7455 
7456 
7457 
7458 
7459 
7460 
7461 
7462 
7463 
7464 
7465 



7466 
7476 
7477 



7470 
7479 



7480 
7481 



7482 
7483 



7484 
7485 
7486 



036676 
C 366 76 
036700 



036700 
036700 
036702 
036704 
056706 

036710 
036710 
036712 
036714 
036716 

036720 
036720 
036722 
036724 
036726 
036730 

036732 
036732 
036734 
036736 
036740 
036742 



7487 
7494 



036744 
036744 



000022 



000031 
036744 
160000 
177776 



001031 
036762 
000040 
000776 



002032 
037015 
177777 
000000 
177777 



003032 
037043 
000377 
000000 
000006 



.SBTTL HAROUARE PARAMETER CODING SECTION 



THE HAROUARE PARAMETER CODING SECTION CONTAINS MACROS 
THAT ARE USED BY THE SUPERVISOR TO BUILD P- TABLES. THE 
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
MACROS ALLOU THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
UITH THE OPERATOR. 



BGNHRO 



;OEVICE CSR ADDRESS QUESTION: 

GPRMA HWPTQl. 0.0. 160000. 177776. fES 



:0EVICE INTERRUPT VECTOR QUESTION: 

GPRMA HUPTQ2,2.0.40.776.YES 



;ACTIVE LINES BIT MAP QUESTION: 

GPRMD HUPTQ3 .4.0, MAPLNS . 0 . MAPLNS . TES 



; INTERRUPT BR LEVEL QUESTION: 

GPRMD HWPTQ4.6,0.377.0.6.TES 



L tHARD : 



.UORO L 10060 LtHARD/? 



7495 036744 


103 


123 


122 


036747 


040 


101 


104 


036752 


104 


122 


105 


036755 


123 


123 


072 


036760 


040 


000 





ENDHRO 



HUPTQl: .ASCIZ /CSR ADDRESS: / 



.UORD 
.UORD 
.WORD 
.UORD 



.UORD 
.UORD 
.UORD 
.UORD 



.UORD 
.WORD 
.UORD 
.UORD 
.UORD 



.UORD 
.UORD 
.UORD 
.UORD 
.WORD 



.EV£N 



L 10060: 



TJCODE 
HUPTQl 
T$L0LIM 
T$HILIM 



T$CODE 
HUPTQ2 
T*L0LIM 
TIHILIM 



T»CODE 

HUPTQ3 

MAPLNS 

T$L0LIM 

T$MILIM 



T$CODE 
HUPTQ4 

377 

T$L0LIM 
TIHILIM 



7496 056762 
036765 
036770 
036773 
036776 
037001 
057004 
037007 
057012 

7497 037015 
057020 
057025 
057026 
057051 
057054 
057057 
057042 

7A9B 057045 
057046 
057051 
057054 
057057 
057062 
057065 

7499 
7500 



: TST PARTI 


MACRO 1 


COOING 


SECTION 


111 


1 16 


124 


105 


122 


122 


125 


120 


124 


040 


126 


105 


105 


124 


117 


122 


040 


101 


104 


104 


122 


105 


123 


123 


072 


040 


000 


101 


105 


124 


111 


126 


105 


040 


114 


111 


116 


105 


040 


102 


111 


124 


040 


115 


101 


120 


072 


040 


000 






111 


116 


124 


105 


122 


122 


125 


120 


124 


040 


102 


122 


040 


114 


105 


126 


105 


114 


072 


040 


000 



KiS 

MAR 04 09:15 PAGE 126 1 

HUPTQ2: .ASCIZ /INTERRUPT VECTOR ADDRESS 

HUPTQ3: .ASCIZ /ACTIVE LINE BIT MAP: / 
HUPTQ4: .ASCIZ /INTERRUPT BR LEVEL: / 



.EVEN 



Li5 
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'>E0 195 



7509 
7510 
7511 
7512 
7513 
7514 
7515 
7516 
7517 
7518 
7519 
7520 
7521 
7522 



7525 
7532 
7553 



7534 
7555 



7536 
7537 



7538 
7539 
7540 
7541 

7542 
7543 
7544 



7545 
7546 
7547 



037070 
037070 
037072 



037072 
03-'072 
037074 
037076 

037100 
037100 
037102 
037104 

057106 
037106 
037110 
037112 



037114 
037114 



037116 
037116 
037120 
037122 
037124 
037126 



7548 
7549 



037130 
037150 



000017 



000150 
037130 
000020 



000150 
057204 
000001 



000150 
057255 
000100 



006044 



001052 
057310 
177777 
000000 
177777 



.SBTTL SOFTWARE PARAMETER COOING SECTION 



THE SOTTUARE PARAMETER CODING SECTION CONTAINS MACROS 
THAT ARE USED BY THE SUPERVISOR TO BUILD P TABLES. THE 
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE 
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
WITH THE OPERATOR. 



BGNSFT 



sUNIT NUMBER PRINTOUT QUESTION: 
GPRML SWPTQl. 0.20, YES 



sROM VERSION NUMBER PRINTOUT ON FIRST PASS QUESTION: 
GPRML SWPTQ2.0.1.YES 



•.EXTENDED ERROR REPORTING QUESTION: 
GPRML SUP TQ3. 0.100. YES 



L$S0FT: 



.WORD L10061-L$S0FT/2 



.WORD T»CODE 
.WORD SWPTQl 



.WORD 20 



.WORD TtCOOE 
.WORD SWPTQ2 
.WORD L 



.WORD T$CODE 
.WORD SWPTQ3 
.WORD 100 

IF EXTENDED ERROR REPORTING IS NOT REQUIRED THEN SKIP THE NEXT QUESTION. 
XFERF ENOD 



:NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE QUESTION: 
GPRMD SWPTQ4.2.D. 177777.0. 177777. YES 



.EVEN 
ENDD: ENOSFT 



L 10061: 



.WORD TSCODE 



.WORD T»CODE 

.WORD SWPTQ4 

.WORD 177777 

.WORD TSLOLIM 

.WORD T$HILIM 



.EVEN 



7556 057130 


122 


105 


120 


0371J5 


117 


122 


124 


057156 


040 


125 


116 


057141 


111 


124 


040 


037144 


116 


125 


115 



SWPTQl: .ASCIZ /REPORT UNIT NUMBER AS EACH UNIT IS TESTED: / 



M15 
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>EQ 194 



7557 



037147 
037152 
037155 
037160 
037163 
037166 
037171 
037174 
037177 
037202 
037204 
037207 
037212 
037215 
037220 
037223 
037226 
037231 
037234 
037237 
037242 
oi7245 
037250 
037253 

7558 037255 
037260 
037263 
037266 
037271 
037274 
037277 
037302 
037305 

7559 037310 
037313 
037316 
037321 
037324 
037327 
037332 
037335 
037340 
037343 
037346 
037351 
037354 
037357 
037362 
037365 
037370 
037373 
037376 

7560 



102 
040 

040 
103 
125 
124 
123 
105 
105 
040 
122 
040 
122 
117 
120 
116 
125 
117 
124 
040 
122 
040 
123 
040 
105 
105 
105 
105 
117 
122 
117 
111 
072 
116 
102 
040 
040 
104 
111 
101 
104 
101 
122 
122 
124 
122 
117 
040 
040 
114 
105 
000 



105 
101 
105 
110 
116 
040 
040 
123 
104 
000 
117 
126 
123 
116 
122 
124 
124 
116 
110 
106 
123 
120 
123 
000 
130 
116 
104 
122 
122 
105 
122 
116 
040 
125 
105 
117 
111 
111 
104 
114 
101 
040 
122 
123 
117 
105 
122 
117 
101 
111 
072 



122 
123 
101 
040 
111 
111 
124 
124 
072 

115 
105 
111 
040 
111 
117 
040 
040 
105 
111 
124 
101 
072 

124 
104 
040 
122 
040 
120 
124 
107 
000 
115 
122 
106 
116 
126 
125 
040 
124 
105 
117 
040 
040 
120 
124 
116 
040 
116 
040 



SUPTQ2: .ASCIZ /ROM VERSION PRINTOUT ON THE FIRST PASS: / 



SUPTQ3: .ASCIZ /EXTENDED ERROR REPORTING: / 



SUPTQ4: .ASCIZ /NUMBER OF INDIVIDUAL DATA ERRORS TO REPORT ON A LINE: / 



.EVEN 



15 MAR 84 09; 15 



N15 

PAGE 128 



756i 
7570 

7571 037400 

7572 037400 
7575 

7580 
7581 
7582 
7583 

7564 037450 

037450 
037452 
037454 

7585 037454 

7506 

7587 

7588 

7589 

7590 

7591 

7592 

7593 



000000 
000000 



00000 I 



♦PATCH: : 



.BLKU 24 



LASTAO 



L»LAST: : 



ENOMOO 



.END 



<^eO 195 



.EVEN 
.WORD O 
.UORO 0 



CZOHUeO OHU II KINC TbT PARTI 
S>HeOL TABLf 



ACILNS 002250 C C»AU • 

AOR • 000020 C C»AUTO« 

AORPTR 017764 C CIBftK • 

AL'fLD 017454 G C»BSEG- 

ASSEHB* 000010 CtBSUB- 

BCOUNT 002S52 G CtCEFG- 

BITTBL 002410 G C$CLCK> 

Biro • 000001 G CICLEA- 

BITOO > 000001 G CICLOS- 

BITOl - 000002 G ClCLPl- 

Bir02 • 000004 G CtCVEC- 

BiroS > 000010 G ClOCLN* 

Birc4 ■ 0000^0 G ctooou" 

Biros • 000040 G ClORPT- 

BIT06 • 000100 G C<OU - 

Bir07 • 000200 G CtEOir- 

Biros • 000400 G CtEROF- 

BIT09 • 001000 G CIERHR- 

BITl • 000002 C CIERftO- 

BiriO • 002000 G CIERSF- 

BITil . 004000 G CIERSO- 

BIT 12 - 010000 C CtESCA- 

Biri5 - 020000 G CIESEG- 

BIT14 • 040000 G CIESUB- 

BIT15 • lOOOOO G CIETST- 

BIT2 • 000004 G CIEXIT- 

BITS > 000010 G CIGETB- 

Bir4 • 000020 C CIGETW 

BIT5 > 000040 G CIGMAN- 

BIT6 - OOOlOO G CIGPMP- 

BIT7 . 000200 G CIGPLO- 

Bira • 000400 g cigpri- 

Bir9 . OOlOOO g c$init- 

BMPCQB 002526 G CIINLP- 

erVCOE. 002726 G CIHANI- 

BMPCQP 002524 G C$HEM • 

BOE - 000400 G OHSG - 

BRLEVL 002240 G ClOPEN- 

BU^BAS 002726 G CtPNTB- 

BUFENO 003726 G CIPNTF- 

BUFMIO 003B26 G CIPNTS- 

BUFPTR 002302 G CIPNTX- 

BUFSQT 003526 G CIQIO - 

CAC»«X 023632 G CtROBU- 

CACHTX 023660 G CIREFG- 

CALMSL 017526 G C«RESE- 

CKTRAP 017752 G CIREVI- 

CLKBRL 002336 G CIRFLA- 

CLKCSR 002334 G C«RPT - 

CLK^Z 002342 G C*SEFG" 

CLKINT 023706 G CISPRI- 

CLKVEC 002340 G CISVEC* 

CL»«Sr 020002 G CirPRI- 

CLR16U 020024 G DELAY 

CNTERR 020046 G OFPTBL 

CSRA 002242 G DIAGHC- 

CTRLCF 002306 G ORAORT 



MACRO M1200 


IS-MAR 84 


09:15 t 




000052 


DROP 


025122 




000061 


DROOnG 


005464 


G 


000022 


0B02MG 


005470 


G 


000004 


OR04nC 


005475 


G 


000002 


OR06nC 


005501 


G 


000045 


ORionc 


005517 


G 


000062 


0R12nG 


005526 


G 


000012 


DR14NG 


005537 


G 


000035 


0R16HG 


005550 


G 


000006 


EOROP 


025200 




000036 


EF.CON* 


000036 


G 


000044 


EF.NEU- 


000035 


G 


000051 


EF.pyR- 


000034 


G 


000024 


EF.RES- 


000037 


G 


000053 


EF.STA" 


000040 


G 


000003 


EFOSOS 


004074 


G 


000055 


EF050S 


004101 


G 


000056 


EF1401 


004154 


G 


000060 


EF1402 


004256 


G 


000054 


EF1601 


004313 


G 


000057 


EF1602 


004345 


G 


000010 


EF1603 


004407 


G 


000005 


EF1604 


004451 


G 


000003 


EFSOOl 


004546 


G 


000001 


EF3002 


004615 


G 


000032 


EF9006 


004664 


G 


000026 


EF9010 


004710 


G 


000027 


EF9016 


004777 


G 


000043 


EF9017 


005074 


G 


000042 


EF9016 


005150 


G 


000030 


EF9S01 


005255 


G 


000040 


EF9302 


005333 


G 


OOOOIl 


ENOlOl 


020360 


G 


000020 


Eri0102 


020444 


G 


000050 


Enoi03 


005560 


G 


000031 


EN0201 


005616 


G 


000023 


EN0202 


005651 


G 


000034 


EN0203 


006024 


G 


000014 


En0204 


006167 


G 


000017 


En0301 


006346 


G 


000016 


Enoso2 


006420 


G 


000015 


En0303 


006560 


G 


000377 


EN0401 


006737 


G 


000007 


EN0402 


007015 


G 


000047 


Enosol 


007165 


G 


000033 


Eri0502 


007241 


G 


000003 


ENOSZS 


007415 


G 


000021 


EN0S26 


007505 


G 


000025 


En0601 


007575 


G 


000046 


Eri0602 


007637 


G 


000041 


En0603 


010017 


G 


000037 


EN0701 


010202 


G 


000013 


Eri0702 


010245 


G 


020124 G 


Eri070S 


010425 


G 


002212 G 


EnOBOl 


010610 


G 


000000 


EH0602 


010656 


G 


002242 G 


EH0901 


010726 


G 



En0902 010766 G 

EMIOOI 0110?? C 

Eni002 Oil ..55 G 

EM1003 011142 G 

EHllOl 011220 G 

EM1201 011273 G 

Em202 011321 G 

EHIZOS 011405 G 

EM1204 011463 G 

Eni20S 011517 G 

EM1301 011543 G 

EM1S02 011576 G 

EM1401 011635 G 

Eril402 011674 G 

EH1403 011762 G 

EH1404 012035 G 

Eni405 012107 G 

Eni406 012122 G 

EM1407 012135 G 

EM1408 012147 G 

EM1501 012155 G 

EniS02 012203 G 

tiH1601 012221 G 

EM1604 012304 G 

EM1701 012360 G 

EMlBOt 012443 G 

Eril90l 012517 C 

En2001 012602 G 

En2002 012652 G 

En2301 012725 G 

EM2302 012772 G 

En2401 013030 G 

En2601 013073 G 

En2602 013131 C 

En2603 013222 G 

EH2604 013310 G 

En260S 013404 G 

En2606 013467 G 

£12607 013526 G 

En260e 013622 G 

EN2609 013673 G 

EM2610 013752 G 

En2611 014044 G 

En2612 014127 G 

EMSOOl 014223 G 

EMS002 014262 G 

EHSOOS 014356 G 

EnS004 014432 G 

EHSOOS 014506 G 

EMSlOl 014600 G 

EnSl02 014643 G 

En9014 014722 G 

EH9017 015016 G 

En9018 015127 G 

Ert9019 015137 G 

EM9020 015154 G 

En9022 015200 G 



EM9023 


01521 7 


G 


En9024 


015241 


c 

vj 


En9301 


015257 


G 
\j 


&f19302 


0153^ 




En950S 


01S366 




Ef19304 


015435 




ENOO 


05 7 1 50 




ENOETB 


005726 


Q 


ENDir 


025042 




ERCNTB 


002464 




ERLTBL 


002726 


G 


errblk 


003774 


G 


ERRHSG 


003772 


G 


ERRNBR 


003770 


G 


ERRT IP 


003766 


G 


ERSMRF 


002462 


G 


EROlOl 


015510 G 


ER0201 


016042 G 


ER0503 


016136 


G 


ER0SO4 


016174 


G 


ER1401 


016254 


G 


ER1601 


016416 


G 


ER1603 


016526 


G 


ER3001 


016620 


G 


ER9004 


016722 G 


ER9007 


017036 


G 


ER9008 


017126 


G 


ER9101 


017222 G 


ER9301 


017262 


G 


EVL ■ 


000004 


G 


EXOERR 


002304 


G 


EIENO - 


002100 




EILOAO- 


000035 




FOATA 


002250 G 


FSLSA 


002250 


G 


FSLSO ■ 


000006 


G 


FIAU ■ 


000015 




FIAUTO- 


000020 




FtBGN • 


000040 




FICLEA- 


000007 




FlOU ■ 


000016 




FIEND ■ 


000041 




FIHARD- 


0000O4 




FtHU ■ 


000013 




FtlNir* 


000006 




FIJMP - 


000050 




FINOD • 


000000 




FtHSG ■ 


000011 




F|PROr> 


000021 




FIPMR ■ 


000017 




FIRPT • 


000012 




FtSEG • 


000C03 




FISOFT. 


000005 




FISRV ■ 


000010 




Ftsue • 


000002 




FtSW - 


000014 




FJTEST- 


000001 









fUNC 


TST PARTI 


GE TPRH 


024640 








002450 C 






000200 




1 lAPT 




000372 






r:inT<«Pa 


000009 






r «F K(*D a 


O0O4O0 






riHTl Ta 
0 •HXL 1 ■ 


OOOOOP 






nun T • 


OOOOOt 






it thin ■ 


000000 






n t fWt C a 


000400 




1 tfif on 




000376 






fItPDMA< 


000001 






U«^^>n/ ■ 


000002 






fltPPM • 


000000 








000140 




1 im Y 




000000 




1 ftDTP 


f^lQAnOa 


000040 




L IDTyP 


(tiOAni • 


000120 




1 tOlJ 


fiiBAnn* 

VJ • fifH/w ■ 


000020 




I tniji 

k aw I 




C00004 




1 tDVTY 




000010 






Hft P a 


000000 






MV a 


100000 


G 


1 tFDRT 


nalP' 1 yi 


056744 




1 IF TP 


HUPTQ9 


036762 




1 tFXPl 

l» ali*~A 


"■■^ 1 la J 


037015 




1 tFXPA 


H^TQ4 


037043 






IRE a 
IDC * 


010000 


G 




mil ■ 


000040 


G 






020000 G 




lESTAT 


002310 


G 


LtHPTP 




000100 G 


1 tHU 
L ariH 


A AC ■ 


004000 


G 




T 1 All « 


000041 








000041 




1 tl AHP 




000041 




1 11 ACT 
I. aUM9 1 




000041 








000041 








000041 




1 tMDFU 




000041 




1 tklAHF 




000041 








000040 




1 tPBHT 




C00041 




1 tPDT 


ItPuR ■ 


000041 




1 tOFPP 


I IRPT ■ 


000041 




1 tOFU 
L anew 




000041 




1 tBPT 




000041 




1 tcnFT 




000041 




1 topr 




000041 




w a 3r 




000041 




1 tQPTP 


HTST ■ 


000041 




1 t<«Ta 




000167 




1 tcu 


LNCTRA 


002252 


G 


1 tTF<:T 




040000 


G 




LOT 


000010 G 


LtUNZT 


LPCSLT. 


000036 


G 


L 10000 


LPRA 


002246 


G 


LlOOOl 
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rz 








Oft? 110 


c. 








002036 


G 


L 10004 


016172 




025206 


G 


L 10005 


016252 




002070 


G 


L 10006 


016414 




OPSOS6 


G 


L10007 


016524 




002106 


G 


L 10010 


016616 




025060 


G 


L 10011 


016720 






G 


L 10012 


017034 




002011 


G 


L 10013 


017124 




004046 


G 


L 10014 


017220 




002076 


G 


L 10015 


017260 




002060 


G 


L 10016 


017452 




002124 


G 


L10017 


024226 




002116 


G 


L 10021 


025054 




002040 


G 


L 10022 


025056 




002034 


G 


L 10023 


025074 




025076 


G 


L 10024 


025204 




002072 


G 


LI 0025 


025212 




004036 


G 


L 10026 


025474 




002052 


G 


L10027 


025724 




002044 


G 


L 10030 


026170 




003766 


G 


L 10031 


026366 




002102 


G 


L 10032 


026560 




002046 


G 


L 1003 3 


026776 




002064 


G 


L 10034 


027204 




002066 


G 


L 10035 


027412 




036700 


G 


L 10036 


027606 




002120 


G 


L 10037 


030022 




002016 


G 


L 10040 


030250 




002022 


G 


L10041 


030544 




002212 


G 


L 10042 


031032 




002104 


G 


L10043 


031432 




024236 


c 


L 10044 


031774 




002026 


G 


L1004S 


032242 




037454 


G 


L 10046 


032432 




002100 


G 


L10047 


032750 




002074 


G 


L 10050 


033212 




00?0S0 


G 


LlOOSl 


033326 




002000 


G 


L 10052 


033644 




002042 


G 


L 10053 


034220 




024230 


G 


L 10054 


035356 




002112 


G 


L 10055 


036320 




002062 


G 


L 10056 


036614 




002010 


G 


L 10057 


036674 




024222 


G 


L 10060 


036744 




037072 


G 


L10061 


037130 




002056 


c 


MAPLNS> 


177777 


G 


002020 


G 


MFUNIT 


005433 


G 


002024 


G 


nHENAB 
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